#! /bin/sh /usr/share/dpatch/dpatch-run
## 03_misc.dpatch by Mazen Neifer <mazen.neifer@supaero.org>
##
## All lines beginning with `## DP:' are a description of the patch.
## DP: This patch adds contributions of wahono.

@DPATCH@
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/beeport/beeport.pas mseide-msegui-1.8/contrib/wahono/beeport/beeport.pas
*** mseide-msegui-1.8.orig/contrib/wahono/beeport/beeport.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/beeport/beeport.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,623 ----
+ unit beeport;
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ {$asmmode intel}
+ 
+ (***************************************************************
+   beeport version 1.0 (freeware)
+   by: beesoft(tm)
+ 
+   this unit contains two components:
+     - tbyteport: this components access general parallel ports.
+     - tppi8255 : this components access multipurposes parallel
+                  port on ppi8255 card from intel.
+ 
+   with these components, there'll be no more assembler inline
+   codes to access hardware port. just drop the component onto
+   your form, set the port properties, and go! see the details
+   in readme.txt file.
+   any bugs report, comments, suggestions or regards, send 'em
+   to: bisma@mailcity.com - and feel free to do it!
+ 
+   last update: may 12, 1999 on malang, indonesia
+   this unit modified to msegui to use in windows and linux by Sri Wahono
+ ****************************************************************)
+ 
+ interface
+ 
+ uses
+   msewidgets,{$ifdef mswindows}windows{$else}ports{$endif}, sysutils, classes, strutils;
+ {$ifdef linux}
+ var
+ 	port:tport;
+ {$endif}
+ type
+   { new type declarations }
+   tbytebitindex  = 0..7;
+   tportiomode    = (alloutput, allinput, hioutloin, hiinloout);
+ 
+   tppi_iomode    = (basic, strobed, bidirectional);
+   tppi_ioset     = (ioaoutput, ioboutput, iochioutput, ioclooutput);
+   tppi_iocontrol = set of tppi_ioset;
+ 
+   pportdata = ^tportdata;
+   tportdata = record
+      address: word;
+      iomode: tportiomode;
+      value: byte;
+   end;
+ 
+   tvaluechangeevent = procedure(sender: tobject; var newvalue: byte) of object;
+ 
+   { event generator thread }
+   tportmonitor = class(tthread)
+     private
+       foldport: tportdata;
+       fnewport: pportdata;
+       faddrchange, fiomodechange, fvaluechange: tnotifyevent;
+     protected
+       procedure execute; override;
+     public
+       constructor create(var portobj: tportdata);
+       property onaddressdiffer: tnotifyevent read faddrchange;
+       property oniomodediffer: tnotifyevent read fiomodechange;
+       property onvaluediffer: tnotifyevent read fvaluechange;
+   end;
+ 
+   { tbyteport class declarations }
+   tbyteport = class(tcomponent)
+     private
+       fbytevalue: byte;
+       faddress: word;
+       fiomode: tportiomode;
+       fvaluechange: tvaluechangeevent;
+     protected
+       function  getbyte: byte;
+       function  getbit(bitnumber: tbytebitindex): boolean;
+       procedure setbyte(value: byte);
+       procedure setbit(bitnumber: tbytebitindex; bitvalue: boolean);
+     public
+       constructor create(aowner: tcomponent); override;
+       destructor  destroy; override;
+       property bitvalue[bitindex: tbytebitindex]: boolean read getbit write setbit;
+     published
+       property iomode: tportiomode read fiomode write fiomode default alloutput;
+       property address: word read faddress write faddress default $300;
+       property bytevalue: byte read getbyte write setbyte default 0;
+ 
+       property onvaluechange: tvaluechangeevent read fvaluechange write fvaluechange;
+   end;
+ 
+   { tppi8255 class declarations }
+   tppi8255 = class(tcomponent)
+     private
+       //fmonitorport: tportmonitor;
+       fiomode: tppi_iomode;
+       fiocontrol: tppi_iocontrol;
+       fporta, fportb, fportc, fportr: tportdata;
+       fportaresult , fportbresult, fportcresult: string;
+       faddresschange, fcontrolchange, finitppi: tnotifyevent;
+       fpachange, fpbchange, fpcchange: tvaluechangeevent;
+ 
+       function  getbaseaddress: word;
+       function  getctrlword: byte;
+       function  getportavalue: byte;
+       function  getportbvalue: byte;
+       function  getportcvalue: byte;
+       procedure setbaseaddress(ppiaddr: word);
+       procedure setctrlword(ppicw: byte);
+       procedure setiomode(ppiiomode: tppi_iomode);
+       procedure setiocontrol(ppiioctrl: tppi_iocontrol);
+       procedure setportavalue(pavalue: byte);
+       procedure setportbvalue(pbvalue: byte);
+       procedure setportcvalue(pcvalue: byte);
+       procedure analyzeiocontrol;
+     public
+       constructor create(aowner: tcomponent); override;
+       destructor destroy; override;
+       procedure initializeppi;
+ 	  procedure onoff(lineno : byte; status : byte);
+     published
+       property baseaddress: word read getbaseaddress write setbaseaddress;
+       property controlword: byte read getctrlword write setctrlword;
+       property iomode: tppi_iomode read fiomode write setiomode;
+       property iocontrol: tppi_iocontrol read fiocontrol write setiocontrol;
+       property portavalue: byte read getportavalue write setportavalue;
+       property portbvalue: byte read getportbvalue write setportbvalue;
+       property portcvalue: byte read getportcvalue write setportcvalue;
+ 
+       property oniocontrolchange: tnotifyevent read fcontrolchange write fcontrolchange;
+       property onaddresschange: tnotifyevent read faddresschange write faddresschange;
+       property oninitializeppi: tnotifyevent read finitppi write finitppi;
+       property onpavaluechange: tvaluechangeevent read fpachange write fpachange;
+       property onpbvaluechange: tvaluechangeevent read fpbchange write fpbchange;
+       property onpcvaluechange: tvaluechangeevent read fpcchange write fpcchange;
+   end;
+ 
+ { public routines declarations }
+ function  readbit(srcvalue: byte; bitindex: tbytebitindex): boolean;
+ function  writebit(srcvalue: byte; bitindex: tbytebitindex; bitvalue: boolean): byte;
+ function  rotatebit(srcvalue: byte): byte;
+ function pangkat(x:integer; y:integer) : integer;
+ function bytetobin(value: byte): string;
+ {$ifdef mswindows}
+ procedure outport(addr:word;data:byte);stdcall;external 'inpout32.dll' name 'Out32' ;
+ function inport(addr:word):byte;stdcall;external 'inpout32.dll' name 'Inp32';
+ {$endif}
+ procedure register;
+ 
+ implementation
+ 
+ function readbit(srcvalue: byte; bitindex: tbytebitindex): boolean;
+ var
+   dbyte, dbit: byte;
+ begin
+   dbit := 1;
+   dbit := dbit shl bitindex;
+   dbyte := srcvalue;
+   dbyte := dbyte and dbit;
+   result := (dbyte <> 0);
+ end;
+ 
+ function writebit(srcvalue: byte; bitindex: tbytebitindex; bitvalue: boolean): byte;
+ var
+   dbyte, dbit: byte;
+ begin
+   dbit := 1;
+   dbit := dbit shl bitindex;
+   dbyte := srcvalue;
+   if not bitvalue then
+   begin
+     dbit := not dbit;
+     dbyte := dbyte and dbit;
+   end
+   else
+     dbyte := dbyte or dbit;
+   result := dbyte;
+ end;
+ 
+ function rotatebit(srcvalue: byte): byte;
+ var
+   i: integer;
+   swapval: byte;
+ begin
+   swapval := 0;
+   for i := 0 to 7 do swapval := writebit(swapval,i,readbit(srcvalue,7-i));
+   rotatebit := swapval;
+ end;
+ 
+ function bytetobin(value: byte): string;
+ var
+  po: byte;
+  int1: integer;
+  binres : string;
+ begin
+ 	po:=value mod 2;
+ 	value:=value div 2;
+ 	binres := inttostr(po);
+ 	while value>0 do begin
+ 		po:=value mod 2;
+ 		value:=value div 2;
+ 		binres:=inttostr(po) + binres;
+  	end;
+  	if length(binres)<8 then begin
+  		for int1:=1 to 8-length(binres) do begin
+   			binres:='0' + binres
+   		end;
+  	end;
+  	result := binres;
+ end;
+ 
+ function bintobyte(value: string): byte;
+ var
+  po: byte;
+  int1: integer;
+  byteres : byte;
+ begin
+ 	byteres := 0;
+ 	for int1:=1 to length(value) do begin
+ 		po:=strtoint(value[int1]);
+ 		byteres:=byteres + (po * pangkat(2,(8-int1)));
+ 	end;
+  	result := byteres;
+ end;
+ 
+ function pangkat(x:integer; y:integer) : integer;
+ var
+ 	i : integer;
+ 	res : integer;
+ begin
+ 	res:=1;
+ 	for i:=1 to y do begin
+ 		res:=res * x;
+ 	end;
+ 	result := res;
+ end;
+ 
+ { = event generator routines = }
+ 
+ constructor tportmonitor.create(var portobj: tportdata);
+ begin
+   foldport := portobj;
+   fnewport := @portobj;
+   freeonterminate := true;
+   inherited create(false);
+ end;
+ 
+ procedure tportmonitor.execute;
+ begin
+   if terminated then exit;
+   if fnewport^.address <> foldport.address then
+   begin
+     if assigned(onaddressdiffer) then onaddressdiffer(self);
+     foldport := fnewport^;
+   end;
+   if fnewport^.iomode <> foldport.iomode then
+   begin
+     if assigned(oniomodediffer) then oniomodediffer(self);
+     foldport := fnewport^;
+   end;
+   if fnewport^.value <> foldport.value then
+   begin
+     if assigned(onvaluediffer) then onvaluediffer(self);
+     foldport := fnewport^;
+   end;
+ end;
+ 
+ { = tbyteport routines = }
+ 
+ constructor tbyteport.create(aowner: tcomponent);
+ begin
+   inherited create(aowner);
+   fiomode := alloutput;
+   faddress := $300;
+   fbytevalue := 0;
+   {$ifdef mswindows}
+   outport(faddress, fbytevalue);
+   {$else}
+   port[faddress]:=fbytevalue;
+   {$endif}
+ end;
+ 
+ destructor tbyteport.destroy;
+ begin
+   inherited destroy;
+ end;
+ 
+ procedure tbyteport.setbyte(value: byte);
+ begin
+   if fbytevalue <> value then
+      if assigned(onvaluechange) then onvaluechange(self, value);
+   if fiomode <> allinput then
+   begin
+     fbytevalue := value;
+     {$ifdef mswindows}
+     outport(faddress, fbytevalue);
+     {$else}
+     port[faddress]:=fbytevalue;
+     {$endif}
+   end;
+ end;
+ 
+ function tbyteport.getbyte: byte;
+ var
+   value: byte;
+ begin
+   if fiomode <> alloutput then
+   begin
+   	{$ifdef mswindows}
+     value := inport(faddress);
+     {$else}
+     value := port[faddress];
+     {$endif}
+     if fbytevalue <> value then
+        if assigned(onvaluechange) then onvaluechange(self, value);
+     fbytevalue := value;
+   end;
+   result := fbytevalue;
+ end;
+ 
+ procedure tbyteport.setbit(bitnumber: tbytebitindex; bitvalue: boolean);
+ begin
+   writebit(fbytevalue,bitnumber,bitvalue);
+ end;
+ 
+ function tbyteport.getbit(bitnumber: tbytebitindex): boolean;
+ begin
+   result := readbit(fbytevalue,bitnumber);
+ end;
+ 
+ { = tppi8255 routines = }
+ 
+ constructor tppi8255.create(aowner: tcomponent);
+ begin
+   inherited create(aowner);
+   fportr.address := $303;
+   fportr.iomode := alloutput;
+   fportr.value := $80;
+   analyzeiocontrol;
+   initializeppi;
+ end;
+ 
+ destructor tppi8255.destroy;
+ begin
+   {$ifdef mswindows}	
+   outport(fportr.address, $80);
+   {$else}
+   port[fportr.address]:=$80;
+   {$endif}
+   inherited destroy;
+ end;
+ 
+ procedure tppi8255.onoff(lineno : byte; status : byte);
+ begin
+ 	if status>1 then status:=1;
+ 	if status<0 then status:=0;
+ 	case lineno of
+ 	1..8 :
+ 		begin
+ 			lineno:=8-lineno+1;
+ 			fportaresult:=leftstr(fportaresult,lineno-1) + inttostr(status) + rightstr(fportaresult,8-lineno);
+ 			setportavalue(bintobyte(fportaresult));
+ 			setportbvalue(bintobyte(fportbresult));
+ 			setportcvalue(bintobyte(fportcresult));
+ 		end;
+ 	9..16 :
+ 		begin
+ 			lineno:=16-lineno+1;
+ 			fportbresult:=leftstr(fportbresult,lineno-1) + inttostr(status) + rightstr(fportbresult,8-lineno);
+ 			setportavalue(bintobyte(fportaresult));
+ 			setportbvalue(bintobyte(fportbresult));
+ 			setportcvalue(bintobyte(fportcresult));
+ 		end;
+ 	17..24 :
+ 		begin
+ 			lineno:=24-lineno+1;
+ 			fportcresult:=leftstr(fportcresult,lineno-1) + inttostr(status) + rightstr(fportcresult,8-lineno);
+ 			setportavalue(bintobyte(fportaresult));
+ 			setportbvalue(bintobyte(fportbresult));
+ 			setportcvalue(bintobyte(fportcresult));
+ 		end;
+ 	end;
+ end;
+ 
+ procedure tppi8255.initializeppi;
+ var
+ 	i:byte;
+ begin
+   {$ifdef mswindows}
+   outport(fportr.address, fportr.value);
+   {$else}
+   port[fportr.address]:=fportr.value;
+   {$endif}
+   fportaresult:='00000000';
+   fportbresult:='00000000';
+   fportcresult:='00000000';
+   if assigned(oninitializeppi) then oninitializeppi(self);
+ end;
+ 
+ procedure tppi8255.analyzeiocontrol;
+ begin
+   { analyze port address }
+   fporta.address := fportr.address - 3;
+   fportb.address := fportr.address - 2;
+   fportc.address := fportr.address - 1;
+   { analyze ppi mode }
+   if readbit(fportr.value, 2) then fiomode := strobed else fiomode := basic;
+   if not readbit(fportr.value, 6) and not readbit(fportr.value, 5) then fiomode := basic;
+   if not readbit(fportr.value, 6) and readbit(fportr.value, 5) then fiomode := strobed;
+   if readbit(fportr.value, 6) then fiomode := bidirectional;
+   { analyze porta io }
+   if readbit(fportr.value, 4) then
+   begin
+     fporta.iomode := allinput;
+     fiocontrol := fiocontrol - [ioaoutput];
+   end
+     else
+     begin
+       fporta.iomode := alloutput;
+       fiocontrol := fiocontrol + [ioaoutput];
+     end;
+   { analyze portb io }
+   if readbit(fportr.value, 1) then
+   begin
+     fportb.iomode := allinput;
+     fiocontrol := fiocontrol - [ioboutput];
+   end
+     else
+     begin
+       fportb.iomode := alloutput;
+       fiocontrol := fiocontrol + [ioboutput];
+     end;
+   { analyze portc io }
+   if readbit(fportr.value, 0) and readbit(fportr.value, 3) then
+   begin
+     fportc.iomode := allinput;
+     fiocontrol := fiocontrol - [iochioutput] - [ioclooutput];
+   end
+     else if not readbit(fportr.value, 0) and readbit(fportr.value, 3) then
+     begin
+       fportc.iomode := hiinloout;
+       fiocontrol := fiocontrol - [iochioutput] + [ioclooutput];
+     end
+        else if readbit(fportr.value, 0) and not readbit(fportr.value, 3) then
+        begin
+          fportc.iomode := hioutloin;
+          fiocontrol := fiocontrol + [iochioutput] - [ioclooutput];
+        end
+           else
+           begin
+             fportc.iomode := alloutput;
+             fiocontrol := fiocontrol + [iochioutput] + [ioclooutput];
+           end;
+ end;
+ 
+ function tppi8255.getbaseaddress: word;
+ begin
+   result := fportr.address - 3;
+ end;
+ 
+ procedure tppi8255.setbaseaddress(ppiaddr: word);
+ begin
+   fportr.address := ppiaddr + 3;
+   fporta.address := fportr.address - 3;
+   fportb.address := fportr.address - 2;
+   fportc.address := fportr.address - 1;
+   if assigned(onaddresschange) then onaddresschange(self);
+   initializeppi;
+ end;
+ 
+ function tppi8255.getctrlword: byte;
+ begin
+   result := fportr.value;
+ end;
+ 
+ procedure tppi8255.setctrlword(ppicw: byte);
+ begin
+   fportr.value := ppicw;
+   if not readbit(fportr.value, 7) then fportr.value := writebit(fportr.value, 7, true);
+   if assigned(oniocontrolchange) then oniocontrolchange(self);
+   analyzeiocontrol;
+   initializeppi;
+ end;
+ 
+ procedure tppi8255.setiomode(ppiiomode: tppi_iomode);
+ begin
+   fiomode := ppiiomode;
+   case fiomode of
+     basic        : begin
+                      fportr.value := writebit(fportr.value,6,false);
+                      fportr.value := writebit(fportr.value,5,false);
+                      fportr.value := writebit(fportr.value,2,false);
+                    end;
+     strobed      : begin
+                      fportr.value := writebit(fportr.value,6,false);
+                      fportr.value := writebit(fportr.value,5,true);
+                      fportr.value := writebit(fportr.value,2,true);
+                    end;
+     bidirectional: fportr.value := writebit(fportr.value,6,true);
+   end;
+   if assigned(oniocontrolchange) then oniocontrolchange(self);
+ end;
+ 
+ procedure tppi8255.setiocontrol(ppiioctrl: tppi_iocontrol);
+ begin
+   fiocontrol := ppiioctrl;
+   if fiocontrol * [ioaoutput] = [ioaoutput] then
+      fportr.value := writebit(fportr.value,4,false)
+   else
+      fportr.value := writebit(fportr.value,4,true);
+   if fiocontrol * [ioboutput] = [ioboutput] then
+      fportr.value := writebit(fportr.value,1,false)
+   else
+      fportr.value := writebit(fportr.value,1,true);
+   if fiocontrol * [iochioutput] = [iochioutput] then
+      fportr.value := writebit(fportr.value,3,false)
+   else
+      fportr.value := writebit(fportr.value,3,true);
+   if fiocontrol * [ioclooutput] = [ioclooutput] then
+      fportr.value := writebit(fportr.value,0,false)
+   else
+      fportr.value := writebit(fportr.value,0,true);
+   if assigned(oniocontrolchange) then oniocontrolchange(self);
+ end;
+ 
+ function tppi8255.getportavalue: byte;
+ begin
+   if fporta.iomode <> alloutput then
+   begin
+   	{$ifdef mswindows}
+     fporta.value := inport(fporta.address);
+     {$else}
+     fporta.value := port[fporta.address];
+     {$endif}
+     if assigned(onpavaluechange) then onpavaluechange(self, fporta.value);
+   end;
+   result := fporta.value;
+ end;
+ 
+ procedure tppi8255.setportavalue(pavalue: byte);
+ begin
+   if fporta.iomode <> allinput then
+   begin
+     if fporta.value <> pavalue then
+        if assigned(onpavaluechange) then onpavaluechange(self, pavalue);
+     fporta.value := pavalue;
+     fportaresult:=bytetobin(fporta.value);
+     {$ifdef mswindows}
+     outport(fporta.address, fporta.value);
+     {$else}
+     port[fporta.address]:=fporta.value;
+     {$endif}
+   end;
+ end;
+ 
+ function tppi8255.getportbvalue: byte;
+ begin
+   if fportb.iomode <> alloutput then
+   begin
+   	{$ifdef mswindows}
+     fportb.value := inport(fportb.address);
+     {$else}
+     fportb.value := port[fportb.address];
+     {$endif}
+     if assigned(onpbvaluechange) then onpbvaluechange(self, fportb.value);
+   end;
+   result := fportb.value;
+ end;
+ 
+ procedure tppi8255.setportbvalue(pbvalue: byte);
+ begin
+   if fportb.iomode <> allinput then
+   begin
+     if fportb.value <> pbvalue then
+        if assigned(onpbvaluechange) then onpbvaluechange(self, pbvalue);
+     fportb.value := pbvalue;
+     fportbresult:=bytetobin(fportb.value);
+     {$ifdef mswindows}
+     outport(fportb.address, fportb.value);
+     {$else}
+     port[fportb.address]:=fportb.value;
+     {$endif}
+   end;
+ end;
+ 
+ function tppi8255.getportcvalue: byte;
+ begin
+   if fportc.iomode <> alloutput then
+   begin
+   	{$ifdef mswindows}
+     fportc.value := inport(fportc.address);
+     {$else}
+     fportc.value := port.pp [fportc.address];
+     {$endif}
+     if assigned(onpcvaluechange) then onpcvaluechange(self, fportc.value);
+   end;
+   result := fportc.value;
+ end;
+ 
+ procedure tppi8255.setportcvalue(pcvalue: byte);
+ begin
+   if fportc.iomode <> allinput then
+   begin
+     if fportc.value <> pcvalue then
+        if assigned(onpcvaluechange) then onpcvaluechange(self, pcvalue);
+     fportc.value := pcvalue;
+     fportcresult:=bytetobin(fportc.value);
+     {$ifdef mswindows}
+     outport(fportc.address, fportc.value);
+     {$else}
+     port[fportc.address]:=fportc.value;
+     {$endif}
+   end;
+ end;
+ 
+ { ========= registration routines ========== }
+ 
+ procedure register;
+ begin
+   registercomponents('wahono', [tbyteport]);
+   registercomponents('wahono', [tppi8255]);
+ end;
+ 
+ end.
+ 
Les fichiers binaires mseide-msegui-1.8.orig/contrib/wahono/beeport/inpout32.dll et mseide-msegui-1.8/contrib/wahono/beeport/inpout32.dll sont différents.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/dialog/msethemesdialog.mfm mseide-msegui-1.8/contrib/wahono/themesdialog/dialog/msethemesdialog.mfm
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/dialog/msethemesdialog.mfm	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/dialog/msethemesdialog.mfm	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,471 ----
+ object themesdialogfo: tthemesdialogfo
+   optionswidget = [ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_subfocus, ow_destroywidgets, ow_hinton, ow_autoscale]
+   bounds_x = 101
+   bounds_y = 194
+   bounds_cx = 349
+   bounds_cy = 332
+   taborder = 1
+   visible = False
+   container.optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_subfocus, ow_mousetransparent, ow_destroywidgets, ow_autoscale]
+   container.bounds_x = 0
+   container.bounds_y = 0
+   container.bounds_cx = 349
+   container.bounds_cy = 332
+   container.frame.colorframe = -1879048191
+   container.frame.localprops = [frl_colorframe]
+   container.frame.dummy = 0
+   options = [fo_closeonesc, fo_localshortcuts, fo_autoreadstat, fo_autowritestat, fo_savepos]
+   statfile = tstatfile1
+   caption = 'Themes Configuration'
+   icon.transparency = -2147483648
+   onshow = filldefcolor
+   moduleclassname = 'tmseform'
+   object ok: tbutton
+     optionswidget = [ow_tabfocus, ow_arrowfocus, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 232
+     bounds_y = 304
+     bounds_cx = 50
+     bounds_cy = 21
+     taborder = 1
+     state = [as_default, as_localdefault, as_localcaption]
+     caption = 'Ok'
+     modalresult = mr_ok
+     reffontheight = 13
+   end
+   object cancel: tbutton
+     optionswidget = [ow_tabfocus, ow_arrowfocus, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 288
+     bounds_y = 304
+     bounds_cx = 50
+     bounds_cy = 21
+     state = [as_localcaption]
+     caption = 'Cancel'
+     modalresult = mr_cancel
+     reffontheight = 13
+   end
+   object defcolorlist: tenumedit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 8
+     bounds_y = 8
+     bounds_cx = 100
+     bounds_cy = 33
+     frame.caption = 'Default color name'
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.button.color = -2147483647
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 2
+     onchange = changecolorbefore
+     dropdown.datarowlinecolor = -2147483647
+     dropdown.cols.count = 1
+     dropdown.cols.items = <    
+       item
+       end>
+     reffontheight = 13
+   end
+   object colorareabefore: tpaintbox
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 8
+     bounds_y = 50
+     bounds_cx = 50
+     bounds_cy = 213
+     color = -2147483645
+     frame.colorframe = -1610612734
+     frame.caption = 'old'
+     frame.captionpos = cp_bottom
+     frame.localprops = [frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       0
+       0
+       16
+     )
+     taborder = 3
+   end
+   object colorarea: tpaintbox
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 58
+     bounds_y = 50
+     bounds_cx = 50
+     bounds_cy = 213
+     color = -2147483645
+     frame.colorframe = -1610612734
+     frame.caption = 'new'
+     frame.captionpos = cp_bottom
+     frame.localprops = [frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       0
+       0
+       16
+     )
+     taborder = 4
+   end
+   object usecolor: tbutton
+     bounds_x = 8
+     bounds_y = 278
+     bounds_cx = 100
+     bounds_cy = 19
+     taborder = 5
+     state = [as_localcaption, as_localonexecute]
+     caption = '&Use this color'
+     onexecute = usethiscolor
+   end
+   object hue: tintegeredit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 117
+     bounds_y = 262
+     bounds_cx = 36
+     bounds_cy = 35
+     color = -2147483645
+     frame.caption = 'HUE'
+     frame.captionpos = cp_top
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 6
+     onchange = hsbchange
+     max = 359
+     reffontheight = 13
+   end
+   object sat: tintegeredit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 153
+     bounds_y = 262
+     bounds_cx = 36
+     bounds_cy = 35
+     color = -2147483645
+     frame.caption = 'SAT'
+     frame.captionpos = cp_top
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 7
+     onchange = hsbchange
+     max = 100
+     reffontheight = 13
+   end
+   object bright: tintegeredit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 189
+     bounds_y = 262
+     bounds_cx = 36
+     bounds_cy = 35
+     color = -2147483645
+     frame.caption = 'BRI'
+     frame.captionpos = cp_top
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 8
+     onchange = hsbchange
+     max = 100
+     reffontheight = 13
+   end
+   object red: tintegeredit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 228
+     bounds_y = 262
+     bounds_cx = 36
+     bounds_cy = 35
+     color = -2147483645
+     frame.caption = 'red'
+     frame.captionpos = cp_top
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 9
+     onchange = rgbchange
+     max = 255
+     reffontheight = 13
+   end
+   object green: tintegeredit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 265
+     bounds_y = 262
+     bounds_cx = 36
+     bounds_cy = 35
+     color = -2147483645
+     frame.caption = 'green'
+     frame.captionpos = cp_top
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 10
+     onchange = rgbchange
+     max = 255
+     reffontheight = 13
+   end
+   object blue: tintegeredit
+     optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+     bounds_x = 302
+     bounds_y = 262
+     bounds_cx = 36
+     bounds_cy = 35
+     color = -2147483645
+     frame.caption = 'blue'
+     frame.captionpos = cp_top
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       16
+       0
+       0
+     )
+     taborder = 11
+     onchange = rgbchange
+     max = 255
+     reffontheight = 13
+   end
+   object sliderblue: tslider
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 312
+     bounds_y = 9
+     bounds_cx = 15
+     bounds_cy = 250
+     color = -2147483646
+     frame.colorclient = -2147483647
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe, frl_colorclient]
+     frame.dummy = 0
+     taborder = 12
+     onsetvalue = blueonsetvalue
+     direction = gd_up
+     scrollbar.options = [sbo_moveauto]
+     scrollbar.color = -2147483645
+     scrollbar.colorpattern = -2147483648
+     scrollbar.face.image.transparentcolor = -2147483648
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 2
+     scrollbar.face.fade_pos.items = (
+       0
+       1
+     )
+     scrollbar.face.fade_color.count = 2
+     scrollbar.face.fade_color.items = (
+       -1610612734
+       -1610612727
+     )
+     scrollbar.face.fade_direction = gd_up
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object slidergreen: tslider
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 276
+     bounds_y = 9
+     bounds_cx = 15
+     bounds_cy = 250
+     color = -2147483646
+     frame.colorclient = -2147483647
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe, frl_colorclient]
+     frame.dummy = 0
+     taborder = 13
+     onsetvalue = greenonsetvalue
+     direction = gd_up
+     scrollbar.options = [sbo_moveauto]
+     scrollbar.color = -2147483645
+     scrollbar.colorpattern = -2147483648
+     scrollbar.face.image.transparentcolor = -2147483648
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 2
+     scrollbar.face.fade_pos.items = (
+       0
+       1
+     )
+     scrollbar.face.fade_color.count = 2
+     scrollbar.face.fade_color.items = (
+       -1610612734
+       -1610612728
+     )
+     scrollbar.face.fade_direction = gd_up
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object sliderred: tslider
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 240
+     bounds_y = 9
+     bounds_cx = 15
+     bounds_cy = 250
+     color = -2147483646
+     frame.colorclient = -2147483647
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe, frl_colorclient]
+     frame.dummy = 0
+     taborder = 14
+     onsetvalue = redonsetvalue
+     direction = gd_up
+     scrollbar.options = [sbo_moveauto]
+     scrollbar.color = -2147483645
+     scrollbar.colorpattern = -2147483648
+     scrollbar.face.image.transparentcolor = -2147483648
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 2
+     scrollbar.face.fade_pos.items = (
+       0
+       1
+     )
+     scrollbar.face.fade_color.count = 2
+     scrollbar.face.fade_color.items = (
+       -1610612734
+       -1610612729
+     )
+     scrollbar.face.fade_direction = gd_up
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object sliderbright: tslider
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 199
+     bounds_y = 9
+     bounds_cx = 15
+     bounds_cy = 250
+     color = -2147483646
+     frame.colorclient = -2147483647
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe, frl_colorclient]
+     frame.dummy = 0
+     taborder = 15
+     onsetvalue = brightonsetvalue
+     direction = gd_up
+     scrollbar.options = [sbo_moveauto]
+     scrollbar.color = -2147483645
+     scrollbar.colorpattern = -2147483648
+     scrollbar.face.image.transparentcolor = -2147483648
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 2
+     scrollbar.face.fade_pos.items = (
+       0
+       1
+     )
+     scrollbar.face.fade_color.count = 2
+     scrollbar.face.fade_color.items = (
+       -1610612734
+       -1610612730
+     )
+     scrollbar.face.fade_direction = gd_up
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object slidersat: tslider
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 164
+     bounds_y = 9
+     bounds_cx = 15
+     bounds_cy = 250
+     color = -2147483646
+     frame.colorclient = -2147483647
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe, frl_colorclient]
+     frame.dummy = 0
+     taborder = 16
+     onsetvalue = satonsetvalue
+     direction = gd_up
+     scrollbar.options = [sbo_moveauto]
+     scrollbar.color = -2147483645
+     scrollbar.colorpattern = -2147483648
+     scrollbar.face.image.transparentcolor = -2147483648
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 2
+     scrollbar.face.fade_pos.items = (
+       0
+       1
+     )
+     scrollbar.face.fade_color.count = 2
+     scrollbar.face.fade_color.items = (
+       -1610612730
+       -1610612730
+     )
+     scrollbar.face.fade_direction = gd_up
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object sliderhue: tslider
+     optionswidget = [ow_arrowfocusin, ow_arrowfocusout, ow_destroywidgets]
+     bounds_x = 128
+     bounds_y = 9
+     bounds_cx = 15
+     bounds_cy = 250
+     color = -2147483646
+     frame.colorclient = -2147483647
+     frame.localprops = [frl_levelo, frl_framewidth, frl_colorframe, frl_colorclient]
+     frame.dummy = 0
+     taborder = 17
+     onsetvalue = hueonsetvalue
+     direction = gd_up
+     scrollbar.options = [sbo_moveauto]
+     scrollbar.color = -2147483645
+     scrollbar.colorpattern = -2147483648
+     scrollbar.face.image.transparentcolor = -2147483648
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 7
+     scrollbar.face.fade_pos.items = (
+       0
+       0.166666666
+       0.333333333
+       0.5
+       0.66666666
+       0.83333333
+       1
+     )
+     scrollbar.face.fade_color.count = 7
+     scrollbar.face.fade_color.items = (
+       -1610612729
+       -1610612724
+       -1610612728
+       -1610612726
+       -1610612727
+       -1610612725
+       -1610612729
+     )
+     scrollbar.face.fade_direction = gd_up
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object tgroupbox1: tgroupbox
+     bounds_x = 8
+     bounds_y = 50
+     bounds_cx = 100
+     bounds_cy = 197
+     color = -2147483645
+     frame.colorframe = -1879048191
+     frame.localprops = [frl_levelo, frl_leveli, frl_framewidth, frl_colorframe]
+     frame.dummy = 0
+     taborder = 18
+   end
+   object tstatfile1: tstatfile
+     filename = 'themesdialog.sta'
+     options = [sfo_memory]
+     left = 144
+   end
+ end
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/dialog/msethemesdialog_mfm.pas mseide-msegui-1.8/contrib/wahono/themesdialog/dialog/msethemesdialog_mfm.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/dialog/msethemesdialog_mfm.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/dialog/msethemesdialog_mfm.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,504 ----
+ unit msethemesdialog_mfm;
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ 
+ interface
+ 
+ implementation
+ uses
+  mseclasses,msethemesdialog;
+ 
+ const
+  objdata: record size: integer; data: array[0..9720] of byte end =
+       (size: 9721; data: (
+   84,80,70,48,15,116,116,104,101,109,101,115,100,105,97,108,111,103,102,111,
+   14,116,104,101,109,101,115,100,105,97,108,111,103,102,111,13,111,112,116,105,
+   111,110,115,119,105,100,103,101,116,11,13,111,119,95,97,114,114,111,119,102,
+   111,99,117,115,15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,110,
+   16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,11,111,119,
+   95,115,117,98,102,111,99,117,115,17,111,119,95,100,101,115,116,114,111,121,
+   119,105,100,103,101,116,115,9,111,119,95,104,105,110,116,111,110,12,111,119,
+   95,97,117,116,111,115,99,97,108,101,0,8,98,111,117,110,100,115,95,120,
+   2,101,8,98,111,117,110,100,115,95,121,3,194,0,9,98,111,117,110,100,
+   115,95,99,120,3,93,1,9,98,111,117,110,100,115,95,99,121,3,76,1,
+   8,116,97,98,111,114,100,101,114,2,1,7,118,105,115,105,98,108,101,8,
+   23,99,111,110,116,97,105,110,101,114,46,111,112,116,105,111,110,115,119,105,
+   100,103,101,116,11,13,111,119,95,109,111,117,115,101,102,111,99,117,115,11,
+   111,119,95,116,97,98,102,111,99,117,115,13,111,119,95,97,114,114,111,119,
+   102,111,99,117,115,15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,
+   110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,11,111,
+   119,95,115,117,98,102,111,99,117,115,19,111,119,95,109,111,117,115,101,116,
+   114,97,110,115,112,97,114,101,110,116,17,111,119,95,100,101,115,116,114,111,
+   121,119,105,100,103,101,116,115,12,111,119,95,97,117,116,111,115,99,97,108,
+   101,0,18,99,111,110,116,97,105,110,101,114,46,98,111,117,110,100,115,95,
+   120,2,0,18,99,111,110,116,97,105,110,101,114,46,98,111,117,110,100,115,
+   95,121,2,0,19,99,111,110,116,97,105,110,101,114,46,98,111,117,110,100,
+   115,95,99,120,3,93,1,19,99,111,110,116,97,105,110,101,114,46,98,111,
+   117,110,100,115,95,99,121,3,76,1,26,99,111,110,116,97,105,110,101,114,
+   46,102,114,97,109,101,46,99,111,108,111,114,102,114,97,109,101,4,1,0,
+   0,144,26,99,111,110,116,97,105,110,101,114,46,102,114,97,109,101,46,108,
+   111,99,97,108,112,114,111,112,115,11,14,102,114,108,95,99,111,108,111,114,
+   102,114,97,109,101,0,21,99,111,110,116,97,105,110,101,114,46,102,114,97,
+   109,101,46,100,117,109,109,121,2,0,7,111,112,116,105,111,110,115,11,13,
+   102,111,95,99,108,111,115,101,111,110,101,115,99,17,102,111,95,108,111,99,
+   97,108,115,104,111,114,116,99,117,116,115,15,102,111,95,97,117,116,111,114,
+   101,97,100,115,116,97,116,16,102,111,95,97,117,116,111,119,114,105,116,101,
+   115,116,97,116,10,102,111,95,115,97,118,101,112,111,115,0,8,115,116,97,
+   116,102,105,108,101,7,10,116,115,116,97,116,102,105,108,101,49,7,99,97,
+   112,116,105,111,110,6,20,84,104,101,109,101,115,32,67,111,110,102,105,103,
+   117,114,97,116,105,111,110,17,105,99,111,110,46,116,114,97,110,115,112,97,
+   114,101,110,99,121,4,0,0,0,128,6,111,110,115,104,111,119,7,12,102,
+   105,108,108,100,101,102,99,111,108,111,114,15,109,111,100,117,108,101,99,108,
+   97,115,115,110,97,109,101,6,8,116,109,115,101,102,111,114,109,0,7,116,
+   98,117,116,116,111,110,2,111,107,13,111,112,116,105,111,110,115,119,105,100,
+   103,101,116,11,11,111,119,95,116,97,98,102,111,99,117,115,13,111,119,95,
+   97,114,114,111,119,102,111,99,117,115,17,111,119,95,100,101,115,116,114,111,
+   121,119,105,100,103,101,116,115,18,111,119,95,102,111,110,116,103,108,121,112,
+   104,104,101,105,103,104,116,12,111,119,95,97,117,116,111,115,99,97,108,101,
+   0,8,98,111,117,110,100,115,95,120,3,232,0,8,98,111,117,110,100,115,
+   95,121,3,48,1,9,98,111,117,110,100,115,95,99,120,2,50,9,98,111,
+   117,110,100,115,95,99,121,2,21,8,116,97,98,111,114,100,101,114,2,1,
+   5,115,116,97,116,101,11,10,97,115,95,100,101,102,97,117,108,116,15,97,
+   115,95,108,111,99,97,108,100,101,102,97,117,108,116,15,97,115,95,108,111,
+   99,97,108,99,97,112,116,105,111,110,0,7,99,97,112,116,105,111,110,6,
+   2,79,107,11,109,111,100,97,108,114,101,115,117,108,116,7,5,109,114,95,
+   111,107,13,114,101,102,102,111,110,116,104,101,105,103,104,116,2,13,0,0,
+   7,116,98,117,116,116,111,110,6,99,97,110,99,101,108,13,111,112,116,105,
+   111,110,115,119,105,100,103,101,116,11,11,111,119,95,116,97,98,102,111,99,
+   117,115,13,111,119,95,97,114,114,111,119,102,111,99,117,115,17,111,119,95,
+   100,101,115,116,114,111,121,119,105,100,103,101,116,115,18,111,119,95,102,111,
+   110,116,103,108,121,112,104,104,101,105,103,104,116,12,111,119,95,97,117,116,
+   111,115,99,97,108,101,0,8,98,111,117,110,100,115,95,120,3,32,1,8,
+   98,111,117,110,100,115,95,121,3,48,1,9,98,111,117,110,100,115,95,99,
+   120,2,50,9,98,111,117,110,100,115,95,99,121,2,21,5,115,116,97,116,
+   101,11,15,97,115,95,108,111,99,97,108,99,97,112,116,105,111,110,0,7,
+   99,97,112,116,105,111,110,6,6,67,97,110,99,101,108,11,109,111,100,97,
+   108,114,101,115,117,108,116,7,9,109,114,95,99,97,110,99,101,108,13,114,
+   101,102,102,111,110,116,104,101,105,103,104,116,2,13,0,0,9,116,101,110,
+   117,109,101,100,105,116,12,100,101,102,99,111,108,111,114,108,105,115,116,13,
+   111,112,116,105,111,110,115,119,105,100,103,101,116,11,13,111,119,95,109,111,
+   117,115,101,102,111,99,117,115,11,111,119,95,116,97,98,102,111,99,117,115,
+   13,111,119,95,97,114,114,111,119,102,111,99,117,115,17,111,119,95,100,101,
+   115,116,114,111,121,119,105,100,103,101,116,115,18,111,119,95,102,111,110,116,
+   103,108,121,112,104,104,101,105,103,104,116,12,111,119,95,97,117,116,111,115,
+   99,97,108,101,0,8,98,111,117,110,100,115,95,120,2,8,8,98,111,117,
+   110,100,115,95,121,2,8,9,98,111,117,110,100,115,95,99,120,2,100,9,
+   98,111,117,110,100,115,95,99,121,2,33,13,102,114,97,109,101,46,99,97,
+   112,116,105,111,110,6,18,68,101,102,97,117,108,116,32,99,111,108,111,114,
+   32,110,97,109,101,16,102,114,97,109,101,46,108,111,99,97,108,112,114,111,
+   112,115,11,10,102,114,108,95,108,101,118,101,108,111,14,102,114,108,95,102,
+   114,97,109,101,119,105,100,116,104,14,102,114,108,95,99,111,108,111,114,102,
+   114,97,109,101,0,18,102,114,97,109,101,46,98,117,116,116,111,110,46,99,
+   111,108,111,114,4,1,0,0,128,11,102,114,97,109,101,46,100,117,109,109,
+   121,2,0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,97,109,101,
+   1,2,0,2,16,2,0,2,0,0,8,116,97,98,111,114,100,101,114,2,
+   2,8,111,110,99,104,97,110,103,101,7,17,99,104,97,110,103,101,99,111,
+   108,111,114,98,101,102,111,114,101,25,100,114,111,112,100,111,119,110,46,100,
+   97,116,97,114,111,119,108,105,110,101,99,111,108,111,114,4,1,0,0,128,
+   19,100,114,111,112,100,111,119,110,46,99,111,108,115,46,99,111,117,110,116,
+   2,1,19,100,114,111,112,100,111,119,110,46,99,111,108,115,46,105,116,101,
+   109,115,14,1,0,0,13,114,101,102,102,111,110,116,104,101,105,103,104,116,
+   2,13,0,0,9,116,112,97,105,110,116,98,111,120,15,99,111,108,111,114,
+   97,114,101,97,98,101,102,111,114,101,13,111,112,116,105,111,110,115,119,105,
+   100,103,101,116,11,15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,
+   110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,17,111,
+   119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,0,8,98,111,
+   117,110,100,115,95,120,2,8,8,98,111,117,110,100,115,95,121,2,50,9,
+   98,111,117,110,100,115,95,99,120,2,50,9,98,111,117,110,100,115,95,99,
+   121,3,213,0,5,99,111,108,111,114,4,3,0,0,128,16,102,114,97,109,
+   101,46,99,111,108,111,114,102,114,97,109,101,4,2,0,0,160,13,102,114,
+   97,109,101,46,99,97,112,116,105,111,110,6,3,111,108,100,16,102,114,97,
+   109,101,46,99,97,112,116,105,111,110,112,111,115,7,9,99,112,95,98,111,
+   116,116,111,109,16,102,114,97,109,101,46,108,111,99,97,108,112,114,111,112,
+   115,11,14,102,114,108,95,99,111,108,111,114,102,114,97,109,101,0,11,102,
+   114,97,109,101,46,100,117,109,109,121,2,0,16,102,114,97,109,101,46,111,
+   117,116,101,114,102,114,97,109,101,1,2,0,2,0,2,0,2,16,0,8,
+   116,97,98,111,114,100,101,114,2,3,0,0,9,116,112,97,105,110,116,98,
+   111,120,9,99,111,108,111,114,97,114,101,97,13,111,112,116,105,111,110,115,
+   119,105,100,103,101,116,11,15,111,119,95,97,114,114,111,119,102,111,99,117,
+   115,105,110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,
+   17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,0,8,
+   98,111,117,110,100,115,95,120,2,58,8,98,111,117,110,100,115,95,121,2,
+   50,9,98,111,117,110,100,115,95,99,120,2,50,9,98,111,117,110,100,115,
+   95,99,121,3,213,0,5,99,111,108,111,114,4,3,0,0,128,16,102,114,
+   97,109,101,46,99,111,108,111,114,102,114,97,109,101,4,2,0,0,160,13,
+   102,114,97,109,101,46,99,97,112,116,105,111,110,6,3,110,101,119,16,102,
+   114,97,109,101,46,99,97,112,116,105,111,110,112,111,115,7,9,99,112,95,
+   98,111,116,116,111,109,16,102,114,97,109,101,46,108,111,99,97,108,112,114,
+   111,112,115,11,14,102,114,108,95,99,111,108,111,114,102,114,97,109,101,0,
+   11,102,114,97,109,101,46,100,117,109,109,121,2,0,16,102,114,97,109,101,
+   46,111,117,116,101,114,102,114,97,109,101,1,2,0,2,0,2,0,2,16,
+   0,8,116,97,98,111,114,100,101,114,2,4,0,0,7,116,98,117,116,116,
+   111,110,8,117,115,101,99,111,108,111,114,8,98,111,117,110,100,115,95,120,
+   2,8,8,98,111,117,110,100,115,95,121,3,22,1,9,98,111,117,110,100,
+   115,95,99,120,2,100,9,98,111,117,110,100,115,95,99,121,2,19,8,116,
+   97,98,111,114,100,101,114,2,5,5,115,116,97,116,101,11,15,97,115,95,
+   108,111,99,97,108,99,97,112,116,105,111,110,17,97,115,95,108,111,99,97,
+   108,111,110,101,120,101,99,117,116,101,0,7,99,97,112,116,105,111,110,6,
+   15,38,85,115,101,32,116,104,105,115,32,99,111,108,111,114,9,111,110,101,
+   120,101,99,117,116,101,7,12,117,115,101,116,104,105,115,99,111,108,111,114,
+   0,0,12,116,105,110,116,101,103,101,114,101,100,105,116,3,104,117,101,13,
+   111,112,116,105,111,110,115,119,105,100,103,101,116,11,13,111,119,95,109,111,
+   117,115,101,102,111,99,117,115,11,111,119,95,116,97,98,102,111,99,117,115,
+   13,111,119,95,97,114,114,111,119,102,111,99,117,115,15,111,119,95,97,114,
+   114,111,119,102,111,99,117,115,105,110,16,111,119,95,97,114,114,111,119,102,
+   111,99,117,115,111,117,116,17,111,119,95,100,101,115,116,114,111,121,119,105,
+   100,103,101,116,115,18,111,119,95,102,111,110,116,103,108,121,112,104,104,101,
+   105,103,104,116,12,111,119,95,97,117,116,111,115,99,97,108,101,0,8,98,
+   111,117,110,100,115,95,120,2,117,8,98,111,117,110,100,115,95,121,3,6,
+   1,9,98,111,117,110,100,115,95,99,120,2,36,9,98,111,117,110,100,115,
+   95,99,121,2,35,5,99,111,108,111,114,4,3,0,0,128,13,102,114,97,
+   109,101,46,99,97,112,116,105,111,110,6,3,72,85,69,16,102,114,97,109,
+   101,46,99,97,112,116,105,111,110,112,111,115,7,6,99,112,95,116,111,112,
+   16,102,114,97,109,101,46,108,111,99,97,108,112,114,111,112,115,11,10,102,
+   114,108,95,108,101,118,101,108,111,14,102,114,108,95,102,114,97,109,101,119,
+   105,100,116,104,14,102,114,108,95,99,111,108,111,114,102,114,97,109,101,0,
+   11,102,114,97,109,101,46,100,117,109,109,121,2,0,16,102,114,97,109,101,
+   46,111,117,116,101,114,102,114,97,109,101,1,2,0,2,16,2,0,2,0,
+   0,8,116,97,98,111,114,100,101,114,2,6,8,111,110,99,104,97,110,103,
+   101,7,9,104,115,98,99,104,97,110,103,101,3,109,97,120,3,103,1,13,
+   114,101,102,102,111,110,116,104,101,105,103,104,116,2,13,0,0,12,116,105,
+   110,116,101,103,101,114,101,100,105,116,3,115,97,116,13,111,112,116,105,111,
+   110,115,119,105,100,103,101,116,11,13,111,119,95,109,111,117,115,101,102,111,
+   99,117,115,11,111,119,95,116,97,98,102,111,99,117,115,13,111,119,95,97,
+   114,114,111,119,102,111,99,117,115,15,111,119,95,97,114,114,111,119,102,111,
+   99,117,115,105,110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,
+   117,116,17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,
+   18,111,119,95,102,111,110,116,103,108,121,112,104,104,101,105,103,104,116,12,
+   111,119,95,97,117,116,111,115,99,97,108,101,0,8,98,111,117,110,100,115,
+   95,120,3,153,0,8,98,111,117,110,100,115,95,121,3,6,1,9,98,111,
+   117,110,100,115,95,99,120,2,36,9,98,111,117,110,100,115,95,99,121,2,
+   35,5,99,111,108,111,114,4,3,0,0,128,13,102,114,97,109,101,46,99,
+   97,112,116,105,111,110,6,3,83,65,84,16,102,114,97,109,101,46,99,97,
+   112,116,105,111,110,112,111,115,7,6,99,112,95,116,111,112,16,102,114,97,
+   109,101,46,108,111,99,97,108,112,114,111,112,115,11,10,102,114,108,95,108,
+   101,118,101,108,111,14,102,114,108,95,102,114,97,109,101,119,105,100,116,104,
+   14,102,114,108,95,99,111,108,111,114,102,114,97,109,101,0,11,102,114,97,
+   109,101,46,100,117,109,109,121,2,0,16,102,114,97,109,101,46,111,117,116,
+   101,114,102,114,97,109,101,1,2,0,2,16,2,0,2,0,0,8,116,97,
+   98,111,114,100,101,114,2,7,8,111,110,99,104,97,110,103,101,7,9,104,
+   115,98,99,104,97,110,103,101,3,109,97,120,2,100,13,114,101,102,102,111,
+   110,116,104,101,105,103,104,116,2,13,0,0,12,116,105,110,116,101,103,101,
+   114,101,100,105,116,6,98,114,105,103,104,116,13,111,112,116,105,111,110,115,
+   119,105,100,103,101,116,11,13,111,119,95,109,111,117,115,101,102,111,99,117,
+   115,11,111,119,95,116,97,98,102,111,99,117,115,13,111,119,95,97,114,114,
+   111,119,102,111,99,117,115,15,111,119,95,97,114,114,111,119,102,111,99,117,
+   115,105,110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,
+   17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,18,111,
+   119,95,102,111,110,116,103,108,121,112,104,104,101,105,103,104,116,12,111,119,
+   95,97,117,116,111,115,99,97,108,101,0,8,98,111,117,110,100,115,95,120,
+   3,189,0,8,98,111,117,110,100,115,95,121,3,6,1,9,98,111,117,110,
+   100,115,95,99,120,2,36,9,98,111,117,110,100,115,95,99,121,2,35,5,
+   99,111,108,111,114,4,3,0,0,128,13,102,114,97,109,101,46,99,97,112,
+   116,105,111,110,6,3,66,82,73,16,102,114,97,109,101,46,99,97,112,116,
+   105,111,110,112,111,115,7,6,99,112,95,116,111,112,16,102,114,97,109,101,
+   46,108,111,99,97,108,112,114,111,112,115,11,10,102,114,108,95,108,101,118,
+   101,108,111,14,102,114,108,95,102,114,97,109,101,119,105,100,116,104,14,102,
+   114,108,95,99,111,108,111,114,102,114,97,109,101,0,11,102,114,97,109,101,
+   46,100,117,109,109,121,2,0,16,102,114,97,109,101,46,111,117,116,101,114,
+   102,114,97,109,101,1,2,0,2,16,2,0,2,0,0,8,116,97,98,111,
+   114,100,101,114,2,8,8,111,110,99,104,97,110,103,101,7,9,104,115,98,
+   99,104,97,110,103,101,3,109,97,120,2,100,13,114,101,102,102,111,110,116,
+   104,101,105,103,104,116,2,13,0,0,12,116,105,110,116,101,103,101,114,101,
+   100,105,116,3,114,101,100,13,111,112,116,105,111,110,115,119,105,100,103,101,
+   116,11,13,111,119,95,109,111,117,115,101,102,111,99,117,115,11,111,119,95,
+   116,97,98,102,111,99,117,115,13,111,119,95,97,114,114,111,119,102,111,99,
+   117,115,15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,110,16,111,
+   119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,17,111,119,95,100,
+   101,115,116,114,111,121,119,105,100,103,101,116,115,18,111,119,95,102,111,110,
+   116,103,108,121,112,104,104,101,105,103,104,116,12,111,119,95,97,117,116,111,
+   115,99,97,108,101,0,8,98,111,117,110,100,115,95,120,3,228,0,8,98,
+   111,117,110,100,115,95,121,3,6,1,9,98,111,117,110,100,115,95,99,120,
+   2,36,9,98,111,117,110,100,115,95,99,121,2,35,5,99,111,108,111,114,
+   4,3,0,0,128,13,102,114,97,109,101,46,99,97,112,116,105,111,110,6,
+   3,114,101,100,16,102,114,97,109,101,46,99,97,112,116,105,111,110,112,111,
+   115,7,6,99,112,95,116,111,112,16,102,114,97,109,101,46,108,111,99,97,
+   108,112,114,111,112,115,11,10,102,114,108,95,108,101,118,101,108,111,14,102,
+   114,108,95,102,114,97,109,101,119,105,100,116,104,14,102,114,108,95,99,111,
+   108,111,114,102,114,97,109,101,0,11,102,114,97,109,101,46,100,117,109,109,
+   121,2,0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,97,109,101,
+   1,2,0,2,16,2,0,2,0,0,8,116,97,98,111,114,100,101,114,2,
+   9,8,111,110,99,104,97,110,103,101,7,9,114,103,98,99,104,97,110,103,
+   101,3,109,97,120,3,255,0,13,114,101,102,102,111,110,116,104,101,105,103,
+   104,116,2,13,0,0,12,116,105,110,116,101,103,101,114,101,100,105,116,5,
+   103,114,101,101,110,13,111,112,116,105,111,110,115,119,105,100,103,101,116,11,
+   13,111,119,95,109,111,117,115,101,102,111,99,117,115,11,111,119,95,116,97,
+   98,102,111,99,117,115,13,111,119,95,97,114,114,111,119,102,111,99,117,115,
+   15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,110,16,111,119,95,
+   97,114,114,111,119,102,111,99,117,115,111,117,116,17,111,119,95,100,101,115,
+   116,114,111,121,119,105,100,103,101,116,115,18,111,119,95,102,111,110,116,103,
+   108,121,112,104,104,101,105,103,104,116,12,111,119,95,97,117,116,111,115,99,
+   97,108,101,0,8,98,111,117,110,100,115,95,120,3,9,1,8,98,111,117,
+   110,100,115,95,121,3,6,1,9,98,111,117,110,100,115,95,99,120,2,36,
+   9,98,111,117,110,100,115,95,99,121,2,35,5,99,111,108,111,114,4,3,
+   0,0,128,13,102,114,97,109,101,46,99,97,112,116,105,111,110,6,5,103,
+   114,101,101,110,16,102,114,97,109,101,46,99,97,112,116,105,111,110,112,111,
+   115,7,6,99,112,95,116,111,112,16,102,114,97,109,101,46,108,111,99,97,
+   108,112,114,111,112,115,11,10,102,114,108,95,108,101,118,101,108,111,14,102,
+   114,108,95,102,114,97,109,101,119,105,100,116,104,14,102,114,108,95,99,111,
+   108,111,114,102,114,97,109,101,0,11,102,114,97,109,101,46,100,117,109,109,
+   121,2,0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,97,109,101,
+   1,2,0,2,16,2,0,2,0,0,8,116,97,98,111,114,100,101,114,2,
+   10,8,111,110,99,104,97,110,103,101,7,9,114,103,98,99,104,97,110,103,
+   101,3,109,97,120,3,255,0,13,114,101,102,102,111,110,116,104,101,105,103,
+   104,116,2,13,0,0,12,116,105,110,116,101,103,101,114,101,100,105,116,4,
+   98,108,117,101,13,111,112,116,105,111,110,115,119,105,100,103,101,116,11,13,
+   111,119,95,109,111,117,115,101,102,111,99,117,115,11,111,119,95,116,97,98,
+   102,111,99,117,115,13,111,119,95,97,114,114,111,119,102,111,99,117,115,15,
+   111,119,95,97,114,114,111,119,102,111,99,117,115,105,110,16,111,119,95,97,
+   114,114,111,119,102,111,99,117,115,111,117,116,17,111,119,95,100,101,115,116,
+   114,111,121,119,105,100,103,101,116,115,18,111,119,95,102,111,110,116,103,108,
+   121,112,104,104,101,105,103,104,116,12,111,119,95,97,117,116,111,115,99,97,
+   108,101,0,8,98,111,117,110,100,115,95,120,3,46,1,8,98,111,117,110,
+   100,115,95,121,3,6,1,9,98,111,117,110,100,115,95,99,120,2,36,9,
+   98,111,117,110,100,115,95,99,121,2,35,5,99,111,108,111,114,4,3,0,
+   0,128,13,102,114,97,109,101,46,99,97,112,116,105,111,110,6,4,98,108,
+   117,101,16,102,114,97,109,101,46,99,97,112,116,105,111,110,112,111,115,7,
+   6,99,112,95,116,111,112,16,102,114,97,109,101,46,108,111,99,97,108,112,
+   114,111,112,115,11,10,102,114,108,95,108,101,118,101,108,111,14,102,114,108,
+   95,102,114,97,109,101,119,105,100,116,104,14,102,114,108,95,99,111,108,111,
+   114,102,114,97,109,101,0,11,102,114,97,109,101,46,100,117,109,109,121,2,
+   0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,97,109,101,1,2,
+   0,2,16,2,0,2,0,0,8,116,97,98,111,114,100,101,114,2,11,8,
+   111,110,99,104,97,110,103,101,7,9,114,103,98,99,104,97,110,103,101,3,
+   109,97,120,3,255,0,13,114,101,102,102,111,110,116,104,101,105,103,104,116,
+   2,13,0,0,7,116,115,108,105,100,101,114,10,115,108,105,100,101,114,98,
+   108,117,101,13,111,112,116,105,111,110,115,119,105,100,103,101,116,11,15,111,
+   119,95,97,114,114,111,119,102,111,99,117,115,105,110,16,111,119,95,97,114,
+   114,111,119,102,111,99,117,115,111,117,116,17,111,119,95,100,101,115,116,114,
+   111,121,119,105,100,103,101,116,115,0,8,98,111,117,110,100,115,95,120,3,
+   56,1,8,98,111,117,110,100,115,95,121,2,9,9,98,111,117,110,100,115,
+   95,99,120,2,15,9,98,111,117,110,100,115,95,99,121,3,250,0,5,99,
+   111,108,111,114,4,2,0,0,128,17,102,114,97,109,101,46,99,111,108,111,
+   114,99,108,105,101,110,116,4,1,0,0,128,16,102,114,97,109,101,46,108,
+   111,99,97,108,112,114,111,112,115,11,10,102,114,108,95,108,101,118,101,108,
+   111,14,102,114,108,95,102,114,97,109,101,119,105,100,116,104,14,102,114,108,
+   95,99,111,108,111,114,102,114,97,109,101,15,102,114,108,95,99,111,108,111,
+   114,99,108,105,101,110,116,0,11,102,114,97,109,101,46,100,117,109,109,121,
+   2,0,8,116,97,98,111,114,100,101,114,2,12,10,111,110,115,101,116,118,
+   97,108,117,101,7,14,98,108,117,101,111,110,115,101,116,118,97,108,117,101,
+   9,100,105,114,101,99,116,105,111,110,7,5,103,100,95,117,112,17,115,99,
+   114,111,108,108,98,97,114,46,111,112,116,105,111,110,115,11,12,115,98,111,
+   95,109,111,118,101,97,117,116,111,0,15,115,99,114,111,108,108,98,97,114,
+   46,99,111,108,111,114,4,3,0,0,128,22,115,99,114,111,108,108,98,97,
+   114,46,99,111,108,111,114,112,97,116,116,101,114,110,4,0,0,0,128,37,
+   115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,105,109,97,103,101,
+   46,116,114,97,110,115,112,97,114,101,110,116,99,111,108,111,114,4,0,0,
+   0,128,33,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,105,109,
+   97,103,101,46,116,114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,
+   128,29,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,
+   101,95,112,111,115,46,99,111,117,110,116,2,2,29,115,99,114,111,108,108,
+   98,97,114,46,102,97,99,101,46,102,97,100,101,95,112,111,115,46,105,116,
+   101,109,115,1,2,0,2,1,0,31,115,99,114,111,108,108,98,97,114,46,
+   102,97,99,101,46,102,97,100,101,95,99,111,108,111,114,46,99,111,117,110,
+   116,2,2,31,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,
+   97,100,101,95,99,111,108,111,114,46,105,116,101,109,115,1,4,2,0,0,
+   160,4,9,0,0,160,0,29,115,99,114,111,108,108,98,97,114,46,102,97,
+   99,101,46,102,97,100,101,95,100,105,114,101,99,116,105,111,110,7,5,103,
+   100,95,117,112,32,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,
+   102,97,100,101,95,116,114,97,110,115,112,97,114,101,110,99,121,4,0,0,
+   0,128,20,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,100,117,
+   109,109,121,2,0,0,0,7,116,115,108,105,100,101,114,11,115,108,105,100,
+   101,114,103,114,101,101,110,13,111,112,116,105,111,110,115,119,105,100,103,101,
+   116,11,15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,110,16,111,
+   119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,17,111,119,95,100,
+   101,115,116,114,111,121,119,105,100,103,101,116,115,0,8,98,111,117,110,100,
+   115,95,120,3,20,1,8,98,111,117,110,100,115,95,121,2,9,9,98,111,
+   117,110,100,115,95,99,120,2,15,9,98,111,117,110,100,115,95,99,121,3,
+   250,0,5,99,111,108,111,114,4,2,0,0,128,17,102,114,97,109,101,46,
+   99,111,108,111,114,99,108,105,101,110,116,4,1,0,0,128,16,102,114,97,
+   109,101,46,108,111,99,97,108,112,114,111,112,115,11,10,102,114,108,95,108,
+   101,118,101,108,111,14,102,114,108,95,102,114,97,109,101,119,105,100,116,104,
+   14,102,114,108,95,99,111,108,111,114,102,114,97,109,101,15,102,114,108,95,
+   99,111,108,111,114,99,108,105,101,110,116,0,11,102,114,97,109,101,46,100,
+   117,109,109,121,2,0,8,116,97,98,111,114,100,101,114,2,13,10,111,110,
+   115,101,116,118,97,108,117,101,7,15,103,114,101,101,110,111,110,115,101,116,
+   118,97,108,117,101,9,100,105,114,101,99,116,105,111,110,7,5,103,100,95,
+   117,112,17,115,99,114,111,108,108,98,97,114,46,111,112,116,105,111,110,115,
+   11,12,115,98,111,95,109,111,118,101,97,117,116,111,0,15,115,99,114,111,
+   108,108,98,97,114,46,99,111,108,111,114,4,3,0,0,128,22,115,99,114,
+   111,108,108,98,97,114,46,99,111,108,111,114,112,97,116,116,101,114,110,4,
+   0,0,0,128,37,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,
+   105,109,97,103,101,46,116,114,97,110,115,112,97,114,101,110,116,99,111,108,
+   111,114,4,0,0,0,128,33,115,99,114,111,108,108,98,97,114,46,102,97,
+   99,101,46,105,109,97,103,101,46,116,114,97,110,115,112,97,114,101,110,99,
+   121,4,0,0,0,128,29,115,99,114,111,108,108,98,97,114,46,102,97,99,
+   101,46,102,97,100,101,95,112,111,115,46,99,111,117,110,116,2,2,29,115,
+   99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,112,
+   111,115,46,105,116,101,109,115,1,2,0,2,1,0,31,115,99,114,111,108,
+   108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,99,111,108,111,114,
+   46,99,111,117,110,116,2,2,31,115,99,114,111,108,108,98,97,114,46,102,
+   97,99,101,46,102,97,100,101,95,99,111,108,111,114,46,105,116,101,109,115,
+   1,4,2,0,0,160,4,8,0,0,160,0,29,115,99,114,111,108,108,98,
+   97,114,46,102,97,99,101,46,102,97,100,101,95,100,105,114,101,99,116,105,
+   111,110,7,5,103,100,95,117,112,32,115,99,114,111,108,108,98,97,114,46,
+   102,97,99,101,46,102,97,100,101,95,116,114,97,110,115,112,97,114,101,110,
+   99,121,4,0,0,0,128,20,115,99,114,111,108,108,98,97,114,46,102,97,
+   99,101,46,100,117,109,109,121,2,0,0,0,7,116,115,108,105,100,101,114,
+   9,115,108,105,100,101,114,114,101,100,13,111,112,116,105,111,110,115,119,105,
+   100,103,101,116,11,15,111,119,95,97,114,114,111,119,102,111,99,117,115,105,
+   110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,117,116,17,111,
+   119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,0,8,98,111,
+   117,110,100,115,95,120,3,240,0,8,98,111,117,110,100,115,95,121,2,9,
+   9,98,111,117,110,100,115,95,99,120,2,15,9,98,111,117,110,100,115,95,
+   99,121,3,250,0,5,99,111,108,111,114,4,2,0,0,128,17,102,114,97,
+   109,101,46,99,111,108,111,114,99,108,105,101,110,116,4,1,0,0,128,16,
+   102,114,97,109,101,46,108,111,99,97,108,112,114,111,112,115,11,10,102,114,
+   108,95,108,101,118,101,108,111,14,102,114,108,95,102,114,97,109,101,119,105,
+   100,116,104,14,102,114,108,95,99,111,108,111,114,102,114,97,109,101,15,102,
+   114,108,95,99,111,108,111,114,99,108,105,101,110,116,0,11,102,114,97,109,
+   101,46,100,117,109,109,121,2,0,8,116,97,98,111,114,100,101,114,2,14,
+   10,111,110,115,101,116,118,97,108,117,101,7,13,114,101,100,111,110,115,101,
+   116,118,97,108,117,101,9,100,105,114,101,99,116,105,111,110,7,5,103,100,
+   95,117,112,17,115,99,114,111,108,108,98,97,114,46,111,112,116,105,111,110,
+   115,11,12,115,98,111,95,109,111,118,101,97,117,116,111,0,15,115,99,114,
+   111,108,108,98,97,114,46,99,111,108,111,114,4,3,0,0,128,22,115,99,
+   114,111,108,108,98,97,114,46,99,111,108,111,114,112,97,116,116,101,114,110,
+   4,0,0,0,128,37,115,99,114,111,108,108,98,97,114,46,102,97,99,101,
+   46,105,109,97,103,101,46,116,114,97,110,115,112,97,114,101,110,116,99,111,
+   108,111,114,4,0,0,0,128,33,115,99,114,111,108,108,98,97,114,46,102,
+   97,99,101,46,105,109,97,103,101,46,116,114,97,110,115,112,97,114,101,110,
+   99,121,4,0,0,0,128,29,115,99,114,111,108,108,98,97,114,46,102,97,
+   99,101,46,102,97,100,101,95,112,111,115,46,99,111,117,110,116,2,2,29,
+   115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,
+   112,111,115,46,105,116,101,109,115,1,2,0,2,1,0,31,115,99,114,111,
+   108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,99,111,108,111,
+   114,46,99,111,117,110,116,2,2,31,115,99,114,111,108,108,98,97,114,46,
+   102,97,99,101,46,102,97,100,101,95,99,111,108,111,114,46,105,116,101,109,
+   115,1,4,2,0,0,160,4,7,0,0,160,0,29,115,99,114,111,108,108,
+   98,97,114,46,102,97,99,101,46,102,97,100,101,95,100,105,114,101,99,116,
+   105,111,110,7,5,103,100,95,117,112,32,115,99,114,111,108,108,98,97,114,
+   46,102,97,99,101,46,102,97,100,101,95,116,114,97,110,115,112,97,114,101,
+   110,99,121,4,0,0,0,128,20,115,99,114,111,108,108,98,97,114,46,102,
+   97,99,101,46,100,117,109,109,121,2,0,0,0,7,116,115,108,105,100,101,
+   114,12,115,108,105,100,101,114,98,114,105,103,104,116,13,111,112,116,105,111,
+   110,115,119,105,100,103,101,116,11,15,111,119,95,97,114,114,111,119,102,111,
+   99,117,115,105,110,16,111,119,95,97,114,114,111,119,102,111,99,117,115,111,
+   117,116,17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,
+   0,8,98,111,117,110,100,115,95,120,3,199,0,8,98,111,117,110,100,115,
+   95,121,2,9,9,98,111,117,110,100,115,95,99,120,2,15,9,98,111,117,
+   110,100,115,95,99,121,3,250,0,5,99,111,108,111,114,4,2,0,0,128,
+   17,102,114,97,109,101,46,99,111,108,111,114,99,108,105,101,110,116,4,1,
+   0,0,128,16,102,114,97,109,101,46,108,111,99,97,108,112,114,111,112,115,
+   11,10,102,114,108,95,108,101,118,101,108,111,14,102,114,108,95,102,114,97,
+   109,101,119,105,100,116,104,14,102,114,108,95,99,111,108,111,114,102,114,97,
+   109,101,15,102,114,108,95,99,111,108,111,114,99,108,105,101,110,116,0,11,
+   102,114,97,109,101,46,100,117,109,109,121,2,0,8,116,97,98,111,114,100,
+   101,114,2,15,10,111,110,115,101,116,118,97,108,117,101,7,16,98,114,105,
+   103,104,116,111,110,115,101,116,118,97,108,117,101,9,100,105,114,101,99,116,
+   105,111,110,7,5,103,100,95,117,112,17,115,99,114,111,108,108,98,97,114,
+   46,111,112,116,105,111,110,115,11,12,115,98,111,95,109,111,118,101,97,117,
+   116,111,0,15,115,99,114,111,108,108,98,97,114,46,99,111,108,111,114,4,
+   3,0,0,128,22,115,99,114,111,108,108,98,97,114,46,99,111,108,111,114,
+   112,97,116,116,101,114,110,4,0,0,0,128,37,115,99,114,111,108,108,98,
+   97,114,46,102,97,99,101,46,105,109,97,103,101,46,116,114,97,110,115,112,
+   97,114,101,110,116,99,111,108,111,114,4,0,0,0,128,33,115,99,114,111,
+   108,108,98,97,114,46,102,97,99,101,46,105,109,97,103,101,46,116,114,97,
+   110,115,112,97,114,101,110,99,121,4,0,0,0,128,29,115,99,114,111,108,
+   108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,112,111,115,46,99,
+   111,117,110,116,2,2,29,115,99,114,111,108,108,98,97,114,46,102,97,99,
+   101,46,102,97,100,101,95,112,111,115,46,105,116,101,109,115,1,2,0,2,
+   1,0,31,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,
+   100,101,95,99,111,108,111,114,46,99,111,117,110,116,2,2,31,115,99,114,
+   111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,99,111,108,
+   111,114,46,105,116,101,109,115,1,4,2,0,0,160,4,6,0,0,160,0,
+   29,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,
+   95,100,105,114,101,99,116,105,111,110,7,5,103,100,95,117,112,32,115,99,
+   114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,116,114,
+   97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,20,115,99,114,111,
+   108,108,98,97,114,46,102,97,99,101,46,100,117,109,109,121,2,0,0,0,
+   7,116,115,108,105,100,101,114,9,115,108,105,100,101,114,115,97,116,13,111,
+   112,116,105,111,110,115,119,105,100,103,101,116,11,15,111,119,95,97,114,114,
+   111,119,102,111,99,117,115,105,110,16,111,119,95,97,114,114,111,119,102,111,
+   99,117,115,111,117,116,17,111,119,95,100,101,115,116,114,111,121,119,105,100,
+   103,101,116,115,0,8,98,111,117,110,100,115,95,120,3,164,0,8,98,111,
+   117,110,100,115,95,121,2,9,9,98,111,117,110,100,115,95,99,120,2,15,
+   9,98,111,117,110,100,115,95,99,121,3,250,0,5,99,111,108,111,114,4,
+   2,0,0,128,17,102,114,97,109,101,46,99,111,108,111,114,99,108,105,101,
+   110,116,4,1,0,0,128,16,102,114,97,109,101,46,108,111,99,97,108,112,
+   114,111,112,115,11,10,102,114,108,95,108,101,118,101,108,111,14,102,114,108,
+   95,102,114,97,109,101,119,105,100,116,104,14,102,114,108,95,99,111,108,111,
+   114,102,114,97,109,101,15,102,114,108,95,99,111,108,111,114,99,108,105,101,
+   110,116,0,11,102,114,97,109,101,46,100,117,109,109,121,2,0,8,116,97,
+   98,111,114,100,101,114,2,16,10,111,110,115,101,116,118,97,108,117,101,7,
+   13,115,97,116,111,110,115,101,116,118,97,108,117,101,9,100,105,114,101,99,
+   116,105,111,110,7,5,103,100,95,117,112,17,115,99,114,111,108,108,98,97,
+   114,46,111,112,116,105,111,110,115,11,12,115,98,111,95,109,111,118,101,97,
+   117,116,111,0,15,115,99,114,111,108,108,98,97,114,46,99,111,108,111,114,
+   4,3,0,0,128,22,115,99,114,111,108,108,98,97,114,46,99,111,108,111,
+   114,112,97,116,116,101,114,110,4,0,0,0,128,37,115,99,114,111,108,108,
+   98,97,114,46,102,97,99,101,46,105,109,97,103,101,46,116,114,97,110,115,
+   112,97,114,101,110,116,99,111,108,111,114,4,0,0,0,128,33,115,99,114,
+   111,108,108,98,97,114,46,102,97,99,101,46,105,109,97,103,101,46,116,114,
+   97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,29,115,99,114,111,
+   108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,112,111,115,46,
+   99,111,117,110,116,2,2,29,115,99,114,111,108,108,98,97,114,46,102,97,
+   99,101,46,102,97,100,101,95,112,111,115,46,105,116,101,109,115,1,2,0,
+   2,1,0,31,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,
+   97,100,101,95,99,111,108,111,114,46,99,111,117,110,116,2,2,31,115,99,
+   114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,99,111,
+   108,111,114,46,105,116,101,109,115,1,4,6,0,0,160,4,6,0,0,160,
+   0,29,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,
+   101,95,100,105,114,101,99,116,105,111,110,7,5,103,100,95,117,112,32,115,
+   99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,116,
+   114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,20,115,99,114,
+   111,108,108,98,97,114,46,102,97,99,101,46,100,117,109,109,121,2,0,0,
+   0,7,116,115,108,105,100,101,114,9,115,108,105,100,101,114,104,117,101,13,
+   111,112,116,105,111,110,115,119,105,100,103,101,116,11,15,111,119,95,97,114,
+   114,111,119,102,111,99,117,115,105,110,16,111,119,95,97,114,114,111,119,102,
+   111,99,117,115,111,117,116,17,111,119,95,100,101,115,116,114,111,121,119,105,
+   100,103,101,116,115,0,8,98,111,117,110,100,115,95,120,3,128,0,8,98,
+   111,117,110,100,115,95,121,2,9,9,98,111,117,110,100,115,95,99,120,2,
+   15,9,98,111,117,110,100,115,95,99,121,3,250,0,5,99,111,108,111,114,
+   4,2,0,0,128,17,102,114,97,109,101,46,99,111,108,111,114,99,108,105,
+   101,110,116,4,1,0,0,128,16,102,114,97,109,101,46,108,111,99,97,108,
+   112,114,111,112,115,11,10,102,114,108,95,108,101,118,101,108,111,14,102,114,
+   108,95,102,114,97,109,101,119,105,100,116,104,14,102,114,108,95,99,111,108,
+   111,114,102,114,97,109,101,15,102,114,108,95,99,111,108,111,114,99,108,105,
+   101,110,116,0,11,102,114,97,109,101,46,100,117,109,109,121,2,0,8,116,
+   97,98,111,114,100,101,114,2,17,10,111,110,115,101,116,118,97,108,117,101,
+   7,13,104,117,101,111,110,115,101,116,118,97,108,117,101,9,100,105,114,101,
+   99,116,105,111,110,7,5,103,100,95,117,112,17,115,99,114,111,108,108,98,
+   97,114,46,111,112,116,105,111,110,115,11,12,115,98,111,95,109,111,118,101,
+   97,117,116,111,0,15,115,99,114,111,108,108,98,97,114,46,99,111,108,111,
+   114,4,3,0,0,128,22,115,99,114,111,108,108,98,97,114,46,99,111,108,
+   111,114,112,97,116,116,101,114,110,4,0,0,0,128,37,115,99,114,111,108,
+   108,98,97,114,46,102,97,99,101,46,105,109,97,103,101,46,116,114,97,110,
+   115,112,97,114,101,110,116,99,111,108,111,114,4,0,0,0,128,33,115,99,
+   114,111,108,108,98,97,114,46,102,97,99,101,46,105,109,97,103,101,46,116,
+   114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,29,115,99,114,
+   111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,112,111,115,
+   46,99,111,117,110,116,2,7,29,115,99,114,111,108,108,98,97,114,46,102,
+   97,99,101,46,102,97,100,101,95,112,111,115,46,105,116,101,109,115,1,2,
+   0,5,0,184,162,54,159,170,170,170,252,63,5,0,176,168,205,167,170,170,
+   170,253,63,5,0,0,0,0,0,0,0,128,254,63,5,0,208,150,8,142,
+   170,170,170,254,63,5,0,104,75,4,71,85,85,213,254,63,2,1,0,31,
+   115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,
+   99,111,108,111,114,46,99,111,117,110,116,2,7,31,115,99,114,111,108,108,
+   98,97,114,46,102,97,99,101,46,102,97,100,101,95,99,111,108,111,114,46,
+   105,116,101,109,115,1,4,7,0,0,160,4,12,0,0,160,4,8,0,0,
+   160,4,10,0,0,160,4,9,0,0,160,4,11,0,0,160,4,7,0,0,
+   160,0,29,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,
+   100,101,95,100,105,114,101,99,116,105,111,110,7,5,103,100,95,117,112,32,
+   115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,
+   116,114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,20,115,99,
+   114,111,108,108,98,97,114,46,102,97,99,101,46,100,117,109,109,121,2,0,
+   0,0,9,116,103,114,111,117,112,98,111,120,10,116,103,114,111,117,112,98,
+   111,120,49,8,98,111,117,110,100,115,95,120,2,8,8,98,111,117,110,100,
+   115,95,121,2,50,9,98,111,117,110,100,115,95,99,120,2,100,9,98,111,
+   117,110,100,115,95,99,121,3,197,0,5,99,111,108,111,114,4,3,0,0,
+   128,16,102,114,97,109,101,46,99,111,108,111,114,102,114,97,109,101,4,1,
+   0,0,144,16,102,114,97,109,101,46,108,111,99,97,108,112,114,111,112,115,
+   11,10,102,114,108,95,108,101,118,101,108,111,10,102,114,108,95,108,101,118,
+   101,108,105,14,102,114,108,95,102,114,97,109,101,119,105,100,116,104,14,102,
+   114,108,95,99,111,108,111,114,102,114,97,109,101,0,11,102,114,97,109,101,
+   46,100,117,109,109,121,2,0,8,116,97,98,111,114,100,101,114,2,18,0,
+   0,9,116,115,116,97,116,102,105,108,101,10,116,115,116,97,116,102,105,108,
+   101,49,8,102,105,108,101,110,97,109,101,6,16,116,104,101,109,101,115,100,
+   105,97,108,111,103,46,115,116,97,7,111,112,116,105,111,110,115,11,10,115,
+   102,111,95,109,101,109,111,114,121,0,4,108,101,102,116,3,144,0,0,0,
+   0)
+  );
+ 
+ initialization
+  registerobjectdata(@objdata,tthemesdialogfo,'');
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/dialog/msethemesdialog.pas mseide-msegui-1.8/contrib/wahono/themesdialog/dialog/msethemesdialog.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/dialog/msethemesdialog.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/dialog/msethemesdialog.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,437 ----
+ { MSEgui Copyright (c) 1999-2006 by Martin Schreiber
+ 
+     See the file COPYING.MSE, included in this distribution,
+     for details about the copyright.
+ 
+     This program is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ }
+ unit msethemesdialog;
+ 
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ 
+ interface
+ uses
+  msegui,mseclasses,mseforms,msegraphedits,msewidgets,msesimplewidgets,
+  msedataedits,msegraphics,mseguiglob,msedialog,classes,msetypes,msedropdownlist,
+  msestrings,mseedit,msestat,msestatfile,msedatalist,mseevent,mseformatstr,
+  mseinplaceedit,msewidgetgrid,msedrawtext,msegraphutils,
+  msebitmap,mserichstring, mseglob;
+ 
+ const
+  themesdialogstatname = 'themesdialog.sta';
+  
+ type
+  tthemesdialogfo = class(tmseform)
+    blue: tintegeredit;
+    bright: tintegeredit;
+    cancel: tbutton;
+    colorarea: tpaintbox;
+    colorareabefore: tpaintbox;
+    defcolorlist: tenumedit;
+    green: tintegeredit;
+    hue: tintegeredit;
+    ok: tbutton;
+    red: tintegeredit;
+    sat: tintegeredit;
+    sliderblue: tslider;
+    sliderbright: tslider;
+    slidergreen: tslider;
+    sliderhue: tslider;
+    sliderred: tslider;
+    slidersat: tslider;
+    tgroupbox1: tgroupbox;
+    tstatfile1: tstatfile;
+    usecolor: tbutton;
+    procedure hueonsetvalue(const sender: TObject; var avalue: realty; var accept: Boolean);
+    procedure satonsetvalue(const sender: TObject; var avalue: realty; var accept: Boolean);
+    procedure brightonsetvalue(const sender: TObject; var avalue: realty; var accept: Boolean);
+    procedure hsbchange(const sender: TObject);
+    procedure redonsetvalue(const sender: TObject; var avalue: realty; var accept: Boolean);
+    procedure greenonsetvalue(const sender: TObject; var avalue: realty; var accept: Boolean);
+    procedure blueonsetvalue(const sender: TObject; var avalue: realty; var accept: Boolean);
+    procedure rgbchange(const sender: TObject);
+    procedure filldefcolor(const sender: TObject);
+    procedure usethiscolor(const sender: TObject);
+    procedure changecolorbefore(const sender: TObject);
+   private
+    fupdating: boolean;
+  end;
+  
+  tthemesedit = class(tmsecomponent,istatfile)
+   private
+    fstatfile: tstatfile;
+    fstatvarname: msestring;
+    procedure setstatfile(const Value: tstatfile);
+   protected
+    procedure statdataread; virtual;
+    procedure dostatread(const reader: tstatreader); virtual;
+    procedure dostatwrite(const writer: tstatwriter); virtual;
+    procedure statreading;
+    procedure statread;
+    function getstatvarname: msestring;
+ 
+    procedure readstatvalue(const reader: tstatreader); virtual;
+    procedure readstatstate(const reader: tstatreader); virtual;
+    procedure readstatoptions(const reader: tstatreader); virtual;
+    procedure writestatvalue(const writer: tstatwriter); virtual;
+    procedure writestatstate(const writer: tstatwriter); virtual;
+    procedure writestatoptions(const writer: tstatwriter); virtual;
+    
+   public
+    constructor create(aowner: tcomponent); override;
+    procedure showdialog;
+    fdefcolor: msestringarty;
+   published
+    property statfile: tstatfile read fstatfile write setstatfile;
+    property statvarname: msestring read getstatvarname write fstatvarname;
+  end;
+ 
+ implementation
+ uses
+  msethemesdialog_mfm,msestockobjects;
+ const
+  valuevarname = 'color';
+  
+ { tthemesedit }
+ 
+ constructor tthemesedit.create(aowner: tcomponent);
+ begin
+  inherited;
+ end;
+ 
+ procedure tthemesedit.statdataread;
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.setstatfile(const Value: tstatfile);
+ begin
+  setstatfilevar(istatfile(self),value,fstatfile);
+ end;
+ 
+ procedure tthemesedit.dostatread(const reader: tstatreader);
+ begin
+   readstatvalue(reader);
+   readstatstate(reader);
+   readstatoptions(reader);
+ end;
+ 
+ procedure tthemesedit.dostatwrite(const writer: tstatwriter);
+ begin
+   writestatvalue(writer);
+   writestatstate(writer);
+   writestatoptions(writer);
+ end;
+ 
+ procedure tthemesedit.statreading;
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.statread;
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.readstatoptions(const reader: tstatreader);
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.readstatstate(const reader: tstatreader);
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.readstatvalue(const reader: tstatreader);
+ var
+  ar1: msestringarty;
+  int1: integer;
+  defcolorar: msestringarty;
+  anewcolor: msestringarty;
+ begin
+  ar1:= nil;
+  ar1:= reader.readarray(valuevarname+'ar',ar1);
+  fdefcolor:= ar1;
+  if high(fdefcolor)>0 then begin
+   for int1:=0 to high(fdefcolor) do begin
+    anewcolor:= nil;
+    setlength(anewcolor,2);
+    splitstring(fdefcolor[int1],anewcolor,'=',true);
+    setcolormapvalue(stringtocolor(anewcolor[0]),stringtocolor(anewcolor[1]));
+    //setcolormapvalue(anewcolor[0],stringtocolor(anewcolor[1]));
+   end;
+  end;
+  application.invalidate;
+ end;
+ 
+ procedure tthemesedit.writestatoptions(const writer: tstatwriter);
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.writestatstate(const writer: tstatwriter);
+ begin
+  //dummy
+ end;
+ 
+ procedure tthemesedit.writestatvalue(const writer: tstatwriter);
+ var
+  ar1: msestringarty;
+ begin
+  ar1:= fdefcolor;
+  writer.writearray(valuevarname+'ar',ar1);
+ end;
+ 
+ function tthemesedit.getstatvarname: msestring;
+ begin
+  result:= fstatvarname;
+ end;
+ 
+ procedure tthemesedit.showdialog;
+ var
+  fo: tthemesdialogfo;
+  result: modalresultty;
+  int1: integer;
+ begin
+  fo:= tthemesdialogfo.create(nil);
+  try
+   result:= fo.show(true);
+   if result = mr_ok then begin
+    fdefcolor := nil;
+    setlength(fdefcolor,fo.defcolorlist.dropdown.valuelist.count);
+    for int1:=0 to fo.defcolorlist.dropdown.valuelist.count-1 do begin
+     fdefcolor[int1]:= fo.defcolorlist.dropdown.valuelist.items[int1] + '=' + colortostring(fo.defcolorlist.enums[int1]);
+     setcolormapvalue(stringtocolor(fo.defcolorlist.dropdown.valuelist.items[int1]),fo.defcolorlist.enums[int1]);
+     //setcolormapvalue(fo.defcolorlist.dropdown.valuelist.items[int1],fo.defcolorlist.enums[int1]);
+    end;
+    application.invalidate;
+   end;
+  finally
+   fo.free;
+  end;
+ end;
+ 
+ { tthemesdialogfo }
+ 
+ procedure tthemesdialogfo.hueonsetvalue(const sender: TObject;
+                                var avalue: realty; var accept: Boolean);
+ begin
+  hue.value:= round(avalue * 360);
+ end;
+ 
+ procedure tthemesdialogfo.satonsetvalue(const sender: TObject;
+                                var avalue: realty; var accept: Boolean);
+ begin
+  sat.value:= round(avalue * 100);
+ end;
+ 
+ procedure tthemesdialogfo.brightonsetvalue(const sender: TObject;
+                                var avalue: realty; var accept: Boolean);
+ begin
+  bright.value:= round(avalue * 100);
+ end;
+ 
+ procedure tthemesdialogfo.hsbchange(const sender: TObject);
+ var
+  r,g,b: real;
+  r1,g1,b1: integer;
+  int1: integer;
+  rea1,rea2: real;
+ begin
+  int1:= hue.value;
+  r:= 0;
+  g:= 0;
+  b:= 0;
+  if int1 < 60 then begin
+   r:= 60;
+   g:= int1;
+  end
+  else begin
+   if int1 < 120 then begin
+    r:= 120 - int1;
+    g:= 60;
+   end
+   else begin
+    if int1 < 180 then begin
+     g:= 60;
+     b:= int1 - 120;
+    end
+    else begin
+     if int1 < 240 then begin
+      g:= 240 - int1;
+      b:= 60
+     end
+     else begin
+      if int1 < 300 then begin
+       b:= 60;
+       r:= int1 - 240;
+      end
+      else begin
+       b:= 360 - int1;
+       r:= 60;
+      end;
+     end;
+    end;
+   end;
+  end;
+  r1:= round(r*255/60);
+  g1:= round(g*255/60);
+  b1:= round(b*255/60);
+  slidersat.scrollbar.face.fade_color[1]:= rgbtocolor(r1,g1,b1);
+  rea1:= sat.value / 100;
+  rea2:= 1-rea1;
+  rea1:= rea1 / 60;
+  r:= r * rea1 + rea2;
+  g:= g * rea1 + rea2;
+  b:= b * rea1 + rea2;
+  r1:= round(r*255);
+  g1:= round(g*255);
+  b1:= round(b*255);
+  sliderbright.scrollbar.face.fade_color[1]:= rgbtocolor(r1,g1,b1);
+  rea1:= bright.value / 100;
+  r:= r*rea1;
+  g:= g*rea1;
+  b:= b*rea1;
+  sliderhue.value:= hue.value/360;
+  slidersat.value:= sat.value/100;
+  sliderbright.value:= bright.value/100;
+  if not fupdating then begin
+   fupdating:= true;
+   red.value:= round(r*255);
+   green.value:= round(g*255);
+   blue.value:= round(b*255);
+   fupdating:= false;
+  end;
+ end;
+ 
+ procedure tthemesdialogfo.blueonsetvalue(const sender: TObject;
+                  var avalue: realty; var accept: Boolean);
+ begin
+  blue.value:= round(avalue * 255);
+ end;
+ 
+ procedure tthemesdialogfo.greenonsetvalue(const sender: TObject;
+                 var avalue: realty; var accept: Boolean);
+ begin
+  green.value:= round(avalue * 255);
+ end;
+ 
+ procedure tthemesdialogfo.redonsetvalue(const sender: TObject;
+                var avalue: realty; var accept: Boolean);
+ begin
+  red.value:= round(avalue * 255);
+ end;
+ 
+ procedure tthemesdialogfo.rgbchange(const sender: TObject);
+ 
+ type
+  colorsegmentty = (cs_red,cs_green,cs_blue);
+ var
+  min,max: integer;
+  br,sa,hu: real;
+  segment: colorsegmentty;
+ 
+  function calchue(l,c,r: integer): real;
+  begin
+   if c > min then begin
+    if l > r then begin
+     result:= -(l-min)/(c-min);
+    end
+    else begin
+     result:= (r-min)/(c-min);
+    end;
+   end
+   else begin
+    result:= 0;
+   end;
+  end;
+ 
+ begin
+  colorarea.frame.colorclient:= rgbtocolor(red.value,green.value,blue.value);
+  sliderred.value:= red.value / 255;
+  slidergreen.value:= green.value / 255;
+  sliderblue.value:= blue.value / 255;
+  if not fupdating then begin
+   fupdating:= true;
+   max:= 0;
+   segment:= cs_red;
+   if red.value > max then begin
+    max:= red.value;
+   end;
+   if green.value > max then begin
+    max:= green.value;
+    segment:= cs_green;
+   end;
+   if blue.value > max then begin
+    max:= blue.value;
+    segment:= cs_blue;
+   end;
+   min:= 255;
+   if red.value < min then begin
+    min:= red.value;
+   end;
+   if green.value < min then begin
+    min:= green.value;
+   end;
+   if blue.value < min then begin
+    min:= blue.value;
+   end;
+   br:= max/255;
+   if br > 0 then begin
+    sa:= 1-min/(255*br);
+    if sa < 0 then begin
+     sa:= 0;
+    end;
+   end
+   else begin
+    sa:= 0
+   end;
+   bright.value:= round(br*100);
+   sat.value:= round(sa*100);
+   case segment of
+    cs_red: begin
+     hu:= calchue(blue.value,red.value,green.value);
+     hue.value:= (round(hu*60)+360) mod 360;
+    end;
+    cs_green: begin
+     hu:= calchue(red.value,green.value,blue.value);
+     hue.value:= round(hu*60) + 120;
+    end;
+    cs_blue: begin
+     hu:= calchue(green.value,blue.value,red.value);
+     hue.value:= (round(hu*60) + 240) mod 360;
+    end;
+   end;
+   fupdating:= false;
+  end;
+ end;
+ 
+ procedure tthemesdialogfo.filldefcolor(const sender: TObject);
+ begin
+  defcolorlist.dropdown.valuelist.asarray:= getcolornames;
+  defcolorlist.enums:= integerarty(getcolorvalues);
+  defcolorlist.min:= minint;
+  //defcolorlist.base:= nb_hex;
+  defcolorlist.valuedefault:= cl_background;
+  defcolorlist.value:= defcolorlist.valuedefault;
+ end;
+ 
+ procedure tthemesdialogfo.usethiscolor(const sender: TObject);
+ begin
+  defcolorlist.enums[defcolorlist.dropdown.itemindex]:= colorarea.frame.colorclient;
+ end;
+ 
+ procedure tthemesdialogfo.changecolorbefore(const sender: TObject);
+ var
+  int1: integer;
+ begin
+  colorareabefore.frame.colorclient:= defcolorlist.enums[defcolorlist.dropdown.itemindex]; 
+  colorarea.frame.colorclient:= defcolorlist.enums[defcolorlist.dropdown.itemindex]; 
+  red.value:= colortorgb(defcolorlist.enums[defcolorlist.dropdown.itemindex]).red; 
+  green.value:= colortorgb(defcolorlist.enums[defcolorlist.dropdown.itemindex]).green; 
+  blue.value:= colortorgb(defcolorlist.enums[defcolorlist.dropdown.itemindex]).blue; 
+ end;
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/regdialogs_bmp.pas mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/regdialogs_bmp.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/regdialogs_bmp.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/regdialogs_bmp.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,266 ----
+ unit regdialogs_bmp;
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ 
+ interface
+ 
+ implementation
+ uses
+  mseclasses,msebitmap;
+ 
+ const
+  objdata_tfilelistview: record size: integer; data: array[0..689] of byte end =
+       (size: 690; data: (
+   84,80,70,48,11,116,98,105,116,109,97,112,99,111,109,112,13,116,102,105,
+   108,101,108,105,115,116,118,105,101,119,12,98,105,116,109,97,112,46,105,109,
+   97,103,101,10,128,2,0,0,0,0,0,0,0,0,0,0,24,0,0,0,
+   24,0,0,0,76,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   255,0,255,25,128,128,128,22,255,0,255,2,128,128,128,1,255,0,255,20,
+   255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,20,255,255,255,1,
+   255,0,255,2,128,128,128,1,255,0,255,20,255,255,255,1,255,0,255,2,
+   128,128,128,1,255,0,255,20,255,255,255,1,255,0,255,2,128,128,128,1,
+   255,0,255,20,255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,20,
+   255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,3,0,0,0,5,
+   255,0,255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,8,
+   255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,3,0,0,0,1,
+   255,0,255,7,0,0,0,1,255,0,255,8,255,255,255,1,255,0,255,2,
+   128,128,128,1,255,0,255,3,0,0,0,1,255,0,255,5,0,0,0,1,
+   255,0,255,1,0,0,0,1,255,0,255,2,0,0,0,3,255,0,255,3,
+   255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,3,0,0,0,4,
+   255,0,255,2,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,1,
+   0,0,0,1,255,0,255,3,0,0,0,1,255,0,255,2,255,255,255,1,
+   255,0,255,2,128,128,128,1,255,0,255,3,0,0,0,1,255,0,255,5,
+   0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,1,0,0,0,5,
+   255,0,255,2,255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,3,
+   0,0,0,1,255,0,255,5,0,0,0,1,255,0,255,1,0,0,0,1,
+   255,0,255,1,0,0,0,1,255,0,255,6,255,255,255,1,255,0,255,2,
+   128,128,128,1,255,0,255,3,0,0,0,1,255,0,255,5,0,0,0,1,
+   255,0,255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,3,
+   0,0,0,1,255,0,255,2,255,255,255,1,255,0,255,2,128,128,128,1,
+   255,0,255,3,0,0,0,1,255,0,255,5,0,0,0,1,255,0,255,1,
+   0,0,0,1,255,0,255,2,0,0,0,3,255,0,255,3,255,255,255,1,
+   255,0,255,2,128,128,128,1,255,0,255,20,255,255,255,1,255,0,255,2,
+   128,128,128,1,255,0,255,20,255,255,255,1,255,0,255,2,128,128,128,1,
+   255,0,255,20,255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,20,
+   255,255,255,1,255,0,255,2,128,128,128,1,255,0,255,20,255,255,255,1,
+   255,0,255,2,128,128,128,1,255,0,255,20,255,255,255,1,255,0,255,2,
+   255,255,255,22,255,0,255,25,0,0)
+  );
+ 
+ const
+  objdata_tfiledialog: record size: integer; data: array[0..551] of byte end =
+       (size: 552; data: (
+   84,80,70,48,11,116,98,105,116,109,97,112,99,111,109,112,11,116,102,105,
+   108,101,100,105,97,108,111,103,12,98,105,116,109,97,112,46,105,109,97,103,
+   101,10,248,1,0,0,0,0,0,0,0,0,0,0,24,0,0,0,24,0,
+   0,0,196,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,128,128,
+   128,25,255,255,255,1,255,0,0,18,255,255,255,1,255,0,0,1,255,255,
+   255,1,128,128,128,25,0,0,0,1,255,0,255,22,0,0,0,2,255,0,
+   255,22,0,0,0,2,255,0,255,22,0,0,0,2,255,0,255,22,0,0,
+   0,2,255,0,255,22,0,0,0,2,255,0,255,3,0,0,0,5,255,0,
+   255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,10,0,0,
+   0,2,255,0,255,3,0,0,0,1,255,0,255,7,0,0,0,1,255,0,
+   255,10,0,0,0,2,255,0,255,3,0,0,0,1,255,0,255,5,0,0,
+   0,1,255,0,255,1,0,0,0,1,255,0,255,2,0,0,0,3,255,0,
+   255,5,0,0,0,2,255,0,255,3,0,0,0,4,255,0,255,2,0,0,
+   0,1,255,0,255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,0,
+   255,3,0,0,0,1,255,0,255,4,0,0,0,2,255,0,255,3,0,0,
+   0,1,255,0,255,5,0,0,0,1,255,0,255,1,0,0,0,1,255,0,
+   255,1,0,0,0,5,255,0,255,4,0,0,0,2,255,0,255,3,0,0,
+   0,1,255,0,255,5,0,0,0,1,255,0,255,1,0,0,0,1,255,0,
+   255,1,0,0,0,1,255,0,255,8,0,0,0,2,255,0,255,3,0,0,
+   0,1,255,0,255,5,0,0,0,1,255,0,255,1,0,0,0,1,255,0,
+   255,1,0,0,0,1,255,0,255,3,0,0,0,1,255,0,255,4,0,0,
+   0,2,255,0,255,3,0,0,0,1,255,0,255,5,0,0,0,1,255,0,
+   255,1,0,0,0,1,255,0,255,2,0,0,0,3,255,0,255,5,0,0,
+   0,2,255,0,255,22,0,0,0,2,255,0,255,22,0,0,0,2,255,0,
+   255,22,0,0,0,2,255,0,255,22,0,0,0,2,255,0,255,22,0,0,
+   0,2,255,0,255,22,0,0,0,2,255,0,255,22,0,0,0,1,255,0,
+   255,1,0,0,0,22,255,0,255,1,0,0)
+  );
+ 
+ const
+  objdata_tfilenameedit: record size: integer; data: array[0..649] of byte end =
+       (size: 650; data: (
+   84,80,70,48,11,116,98,105,116,109,97,112,99,111,109,112,13,116,102,105,
+   108,101,110,97,109,101,101,100,105,116,12,98,105,116,109,97,112,46,105,109,
+   97,103,101,10,88,2,0,0,0,0,0,0,0,0,0,0,24,0,0,0,
+   24,0,0,0,36,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   255,0,255,146,128,128,128,20,255,0,255,4,128,128,128,1,0,0,0,18,
+   255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,255,255,255,16,
+   192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,
+   255,255,255,1,0,0,0,4,255,255,255,2,0,0,0,1,255,255,255,5,
+   0,0,0,1,255,255,255,1,0,0,0,1,192,192,192,1,255,255,255,1,
+   255,0,255,4,128,128,128,1,0,0,0,1,255,255,255,1,0,0,0,1,
+   255,255,255,3,0,0,0,1,255,255,255,1,0,0,0,1,255,255,255,2,
+   0,0,0,1,255,255,255,3,0,0,0,1,255,255,255,1,192,192,192,1,
+   255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,255,255,255,1,
+   0,0,0,1,255,255,255,5,0,0,0,1,255,255,255,1,0,0,0,1,
+   255,255,255,1,0,0,0,1,255,255,255,2,0,0,0,1,255,255,255,1,
+   192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,
+   255,255,255,1,0,0,0,3,255,255,255,1,0,0,0,1,255,255,255,1,
+   0,0,0,1,255,255,255,1,0,0,0,3,255,255,255,2,0,0,0,1,
+   255,255,255,1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,
+   0,0,0,1,255,255,255,1,0,0,0,1,255,255,255,3,0,0,0,1,
+   255,255,255,1,0,0,0,1,255,255,255,1,0,0,0,1,255,255,255,4,
+   0,0,0,1,255,255,255,1,192,192,192,1,255,255,255,1,255,0,255,4,
+   128,128,128,1,0,0,0,1,255,255,255,1,0,0,0,1,255,255,255,3,
+   0,0,0,1,255,255,255,1,0,0,0,1,255,255,255,1,0,0,0,1,
+   255,255,255,1,0,0,0,1,255,255,255,2,0,0,0,1,255,255,255,1,
+   192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,
+   255,255,255,1,0,0,0,1,255,255,255,3,0,0,0,1,255,255,255,1,
+   0,0,0,1,255,255,255,2,0,0,0,1,255,255,255,2,0,0,0,1,
+   255,255,255,1,0,0,0,1,192,192,192,1,255,255,255,1,255,0,255,4,
+   128,128,128,1,0,0,0,1,255,255,255,16,192,192,192,1,255,255,255,1,
+   255,0,255,4,128,128,128,1,192,192,192,18,255,255,255,1,255,0,255,4,
+   255,255,255,20,255,0,255,122,0,0)
+  );
+ 
+ const
+  objdata_tdirdropdownedit: record size: integer; data: array[0..612] of byte end =
+       (size: 613; data: (
+   84,80,70,48,11,116,98,105,116,109,97,112,99,111,109,112,16,116,100,105,
+   114,100,114,111,112,100,111,119,110,101,100,105,116,12,98,105,116,109,97,112,
+   46,105,109,97,103,101,10,48,2,0,0,0,0,0,0,0,0,0,0,24,
+   0,0,0,24,0,0,0,252,1,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,128,128,128,25,255,0,255,15,255,255,255,8,128,128,128,1,255,
+   0,255,1,0,0,0,2,255,0,255,2,0,0,0,1,255,0,255,9,255,
+   255,255,1,255,0,255,5,128,128,128,1,255,255,255,1,128,128,128,1,255,
+   0,255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,3,0,
+   0,0,2,255,0,255,6,255,255,255,1,0,0,0,5,128,128,128,1,255,
+   255,255,1,128,128,128,1,255,0,255,1,0,0,0,1,255,0,255,1,0,
+   0,0,1,255,0,255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,
+   0,255,7,255,255,255,1,255,0,255,1,0,0,0,3,255,0,255,1,128,
+   128,128,1,255,255,255,1,128,128,128,1,255,0,255,1,0,0,0,2,255,
+   0,255,2,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,7,255,
+   255,255,1,255,0,255,2,0,0,0,1,255,0,255,2,128,128,128,1,255,
+   255,255,1,128,128,128,1,255,0,255,15,128,128,128,7,255,255,255,25,0,
+   0,0,25,255,0,255,22,0,0,0,2,255,0,255,1,128,128,128,1,255,
+   0,255,20,0,0,0,2,255,0,255,22,0,0,0,2,255,0,255,1,128,
+   128,128,1,255,0,255,1,128,128,128,1,255,0,255,1,128,128,128,1,255,
+   0,255,1,0,0,0,1,255,0,255,1,0,0,0,1,255,0,255,1,0,
+   0,0,2,255,0,255,1,0,0,0,1,255,0,255,7,0,0,0,2,255,
+   0,255,22,0,0,0,2,255,0,255,1,128,128,128,1,255,0,255,20,0,
+   0,0,2,255,0,255,7,0,0,0,2,255,0,255,1,0,0,0,1,255,
+   0,255,11,0,0,0,2,255,0,255,1,128,128,128,1,255,0,255,1,128,
+   128,128,1,255,0,255,1,128,128,128,1,255,0,255,16,0,0,0,2,255,
+   0,255,22,0,0,0,2,255,0,255,3,128,128,128,1,255,0,255,3,0,
+   0,0,1,255,0,255,1,0,0,0,1,255,0,255,12,0,0,0,2,255,
+   0,255,22,0,0,0,2,255,0,255,3,128,128,128,1,255,0,255,18,0,
+   0,0,2,255,0,255,22,0,0,0,2,255,0,255,22,0,0,0,1,255,
+   0,255,1,0,0,0,22,255,0,255,1,0,0)
+  );
+ 
+ const
+  objdata_tcoloredit: record size: integer; data: array[0..906] of byte end =
+       (size: 907; data: (
+   84,80,70,48,11,116,98,105,116,109,97,112,99,111,109,112,10,116,99,111,
+   108,111,114,101,100,105,116,12,98,105,116,109,97,112,46,105,109,97,103,101,
+   10,92,3,0,0,0,0,0,0,0,0,0,0,24,0,0,0,24,0,0,
+   0,40,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,0,255,
+   146,128,128,128,20,255,0,255,4,128,128,128,1,0,0,0,18,255,255,255,
+   1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,1,0,102,255,
+   1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,1,102,255,0,
+   1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,1,255,0,102,
+   1,255,0,204,1,204,0,255,1,102,0,255,1,0,0,255,1,192,192,192,
+   1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,
+   1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,
+   1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,
+   1,255,0,102,1,0,0,0,1,204,0,255,1,0,0,0,1,0,0,255,
+   1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,
+   1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,
+   1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,
+   1,255,0,0,1,255,0,102,1,255,0,204,1,0,0,0,1,102,0,255,
+   1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,
+   1,0,0,0,1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,
+   1,0,255,102,1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,
+   1,255,102,0,1,255,0,0,1,255,0,102,1,255,0,204,1,0,0,0,
+   1,102,0,255,1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,
+   4,128,128,128,1,0,0,0,1,0,0,255,1,0,102,255,1,0,204,255,
+   1,0,255,204,1,0,255,102,1,0,255,0,1,102,255,0,1,204,255,0,
+   1,255,204,0,1,255,102,0,1,255,0,0,1,255,0,102,1,255,0,204,
+   1,0,0,0,1,102,0,255,1,0,0,255,1,192,192,192,1,255,255,255,
+   1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,1,0,102,255,
+   1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,1,102,255,0,
+   1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,1,255,0,102,
+   1,255,0,204,1,0,0,0,1,102,0,255,1,0,0,255,1,192,192,192,
+   1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,
+   1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,
+   1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,
+   1,255,0,102,1,255,0,204,1,0,0,0,1,102,0,255,1,0,0,255,
+   1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,
+   1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,
+   1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,
+   1,255,0,0,1,255,0,102,1,0,0,0,1,204,0,255,1,0,0,0,
+   1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,
+   1,0,0,0,1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,
+   1,0,255,102,1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,
+   1,255,102,0,1,255,0,0,1,255,0,102,1,255,0,204,1,204,0,255,
+   1,102,0,255,1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,
+   4,128,128,128,1,192,192,192,18,255,255,255,1,255,0,255,4,255,255,255,
+   20,255,0,255,122,0,0)
+  );
+ 
+ const
+  objdata_tthemesedit: record size: integer; data: array[0..906] of byte end =
+       (size: 907; data: (
+   84,80,70,48,11,116,98,105,116,109,97,112,99,111,109,112,10,116,99,111,
+   108,111,114,101,100,105,116,12,98,105,116,109,97,112,46,105,109,97,103,101,
+   10,92,3,0,0,0,0,0,0,0,0,0,0,24,0,0,0,24,0,0,
+   0,40,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
+   0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,255,0,255,
+   146,128,128,128,20,255,0,255,4,128,128,128,1,0,0,0,18,255,255,255,
+   1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,1,0,102,255,
+   1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,1,102,255,0,
+   1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,1,255,0,102,
+   1,255,0,204,1,204,0,255,1,102,0,255,1,0,0,255,1,192,192,192,
+   1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,
+   1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,
+   1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,
+   1,255,0,102,1,0,0,0,1,204,0,255,1,0,0,0,1,0,0,255,
+   1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,
+   1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,
+   1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,
+   1,255,0,0,1,255,0,102,1,255,0,204,1,0,0,0,1,102,0,255,
+   1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,
+   1,0,0,0,1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,
+   1,0,255,102,1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,
+   1,255,102,0,1,255,0,0,1,255,0,102,1,255,0,204,1,0,0,0,
+   1,102,0,255,1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,
+   4,128,128,128,1,0,0,0,1,0,0,255,1,0,102,255,1,0,204,255,
+   1,0,255,204,1,0,255,102,1,0,255,0,1,102,255,0,1,204,255,0,
+   1,255,204,0,1,255,102,0,1,255,0,0,1,255,0,102,1,255,0,204,
+   1,0,0,0,1,102,0,255,1,0,0,255,1,192,192,192,1,255,255,255,
+   1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,1,0,102,255,
+   1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,1,102,255,0,
+   1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,1,255,0,102,
+   1,255,0,204,1,0,0,0,1,102,0,255,1,0,0,255,1,192,192,192,
+   1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,1,0,0,255,
+   1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,1,0,255,0,
+   1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,1,255,0,0,
+   1,255,0,102,1,255,0,204,1,0,0,0,1,102,0,255,1,0,0,255,
+   1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,1,0,0,0,
+   1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,1,0,255,102,
+   1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,1,255,102,0,
+   1,255,0,0,1,255,0,102,1,0,0,0,1,204,0,255,1,0,0,0,
+   1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,4,128,128,128,
+   1,0,0,0,1,0,0,255,1,0,102,255,1,0,204,255,1,0,255,204,
+   1,0,255,102,1,0,255,0,1,102,255,0,1,204,255,0,1,255,204,0,
+   1,255,102,0,1,255,0,0,1,255,0,102,1,255,0,204,1,204,0,255,
+   1,102,0,255,1,0,0,255,1,192,192,192,1,255,255,255,1,255,0,255,
+   4,128,128,128,1,192,192,192,18,255,255,255,1,255,0,255,4,255,255,255,
+   20,255,0,255,122,0,0)
+  );
+ 
+ initialization
+  registerobjectdata(@objdata_tfilelistview,tbitmapcomp,'tfilelistview');
+  registerobjectdata(@objdata_tfiledialog,tbitmapcomp,'tfiledialog');
+  registerobjectdata(@objdata_tfilenameedit,tbitmapcomp,'tfilenameedit');
+  registerobjectdata(@objdata_tdirdropdownedit,tbitmapcomp,'tdirdropdownedit');
+  registerobjectdata(@objdata_tcoloredit,tbitmapcomp,'tcoloredit');
+  registerobjectdata(@objdata_tthemesedit,tbitmapcomp,'tthemesedit');
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/regdialogs.pas mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/regdialogs.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/regdialogs.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/regdialogs.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,29 ----
+ { MSEgui Copyright (c) 1999-2006 by Martin Schreiber
+ 
+     See the file COPYING.MSE, included in this distribution,
+     for details about the copyright.
+ 
+     This program is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ }
+ unit regdialogs;
+ 
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ 
+ interface
+ 
+ implementation
+ uses
+  Classes,msefiledialog,msedesignintf,regdialogs_bmp,msecolordialog,msethemesdialog;
+ 
+ procedure Register;
+ begin
+  registercomponents('Dialog',[tfilelistview,tfiledialog,
+                      tfilenameedit,{thistoryfilenameedit,}
+                      tdirdropdownedit,tcoloredit,tthemesedit]);
+ end;
+ 
+ initialization
+  register;
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/regwahono.pas mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/regwahono.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/regwahono.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/regwahono.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,27 ----
+ { MSEgui Copyright (c) 1999-2006 by Martin Schreiber
+ 
+     See the file COPYING.MSE, included in this distribution,
+     for details about the copyright.
+ 
+     This program is distributed in the hope that it will be useful,
+     but WITHOUT ANY WARRANTY; without even the implied warranty of
+     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+ }
+ unit regwahono;
+ 
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ 
+ interface
+ 
+ implementation
+ uses
+  Classes,msefiledialog,msedesignintf,msecolordialog,msethemesdialog;
+ 
+ procedure Register;
+ begin
+  registercomponents('Wahono',[tthemesedit]);
+ end;
+ 
+ initialization
+  register;
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/whnide.prj mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/whnide.prj
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/regcomponent/whnide.prj	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/regcomponent/whnide.prj	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,834 ----
+ [componentpalette]
+ order0=33
+  0
+  1
+  2
+  3
+  4
+  5
+  6
+  7
+  8
+  9
+  10
+  11
+  12
+  13
+  14
+  15
+  16
+  17
+  18
+  19
+  20
+  21
+  22
+  23
+  24
+  25
+  26
+  27
+  28
+  29
+  30
+  31
+  32
+ order1=0
+ order2=0
+ order3=0
+ order4=0
+ order5=0
+ order6=0
+ order7=0
+ order8=0
+ order9=0
+ order10=0
+ order11=0
+ [projectoptions]
+ projectdir=/C:/DATA/msegui project/whnide
+ projectfilename=/C:/DATA/msegui project/whnide/whnide.prj
+ findinfiledialog=46
+  [findinfileadialogfo]
+  stackedunder=
+  x=268
+  y=415
+  cx=331
+  cy=249
+  [findinfileadialogfo.findtext]
+  value=mainmenuwidgets
+  history=10
+   mainmenuwidgets
+   mainmenuwidget
+   math
+   tobyte
+   binary
+   binto
+   case
+   showmessage
+   tochar
+   tostr
+  [findinfileadialogfo.casesensitive]
+  value=0
+  [findinfileadialogfo.wholeword]
+  value=0
+  [findinfileadialogfo.indirectories]
+  value=1
+  [findinfileadialogfo.inopenfiles]
+  value=0
+  [findinfileadialogfo.dir]
+  filenames=1
+   /D:/msegui/lib/common/
+  filehistory=8
+   /D:/msegui/lib/common/
+   /D:/fpc-2.2.0/rtl/
+   /D:/fpc-2.2.0/packages/
+   /D:/fpc-2.2.0/
+   /C:/msegui/lib/common/
+   
+   /home/mse/proj/msegui/
+   /home/mse/proj/msegui/apps/whnide/
+  filefilterindex=-1
+  filecolwidth=174
+  [findinfileadialogfo.mask]
+  value="*.pas" "*.pp" "*.inc"
+  history=0
+  [findinfileadialogfo.subdirs]
+  value=1
+ finddialog=8
+  [finddialogfo]
+  stackedunder=
+  x=319
+  y=205
+  cx=331
+  cy=116
+  [finddialogfo.selectedonly]
+  value=0
+ replacedialog=23
+  [replacedialogfo]
+  stackedunder=
+  x=383
+  y=291
+  cx=421
+  cy=163
+  [replacedialogfo.replacetext]
+  value=inport
+  history=10
+   inport
+   inport32
+   twhndbnavigator
+   inportb
+   outportb
+   filelistdropdown
+   filelistview
+   mlang
+   componentstate
+   componentmlange
+  [replacedialogfo.selectedonly]
+  value=0
+  [replacedialogfo.promptonreplace]
+  value=1
+ options=54
+  [projectoptionsfo]
+  stackedunder=
+  x=268
+  y=85
+  cx=821
+  cy=572
+  [projectoptionsfo.tabwidget]
+  firsttab=0
+  index=2
+  [projectoptionsfo.ttabwidget2]
+  firsttab=0
+  index=0
+  [projectoptionsfo.filefiltergrid]
+  width0=112
+  width1=673
+  [projectoptionsfo.grid]
+  width1=566
+  [projectoptionsfo.ttabwidget1]
+  firsttab=0
+  index=2
+  [projectoptionsfo.exceptionsgrid]
+  width0=47
+  values1=1
+   EconvertError
+  width1=766
+  [projectoptionsfo.makegroupbox]
+  firsttab=0
+  index=0
+  [projectoptionsfo.macrogrid]
+  width0=13
+  width1=13
+  width2=13
+  width3=13
+  width4=13
+  width5=13
+  width6=146
+  width7=583
+  [projectoptionsfo.macrosplitter]
+  x=0
+  y=188
+  [projectoptionsfo.fontaliasgrid]
+  values0=0
+  width0=98
+  values1=0
+  width1=684
+  values2=0
+  width2=30
+  [projectoptionsfo.newfile]
+  firsttab=0
+  index=0
+  [projectoptionsfo.twidgetgrid3]
+  width0=141
+  width1=332
+  width2=320
+ programparameters=15
+  [programparametersfo]
+  stackedunder=
+  x=272
+  y=346
+  cx=328
+  cy=245
+  [programparametersfo.workingdirectory]
+  filenames=0
+  lastdir=
+  filehistory=0
+  filefilterindex=0
+  filecolwidth=0
+  [programparametersfo.parameters]
+  value=
+  history=0
+ settings=9
+  [settingsfo]
+  stackedunder=
+  x=100
+  y=106
+  cx=358
+  cy=531
+  wsize=0
+  active=1
+  visible=1
+ sigsettings=27
+  1,1,T,F
+  3,3,T,F
+  4,4,T,F
+  6,6,T,F
+  7,7,T,F
+  8,8,T,F
+  9,9,T,F
+  10,10,T,F
+  11,11,T,F
+  12,12,T,F
+  13,13,T,F
+  15,15,T,F
+  16,16,T,F
+  17,17,F,F
+  18,18,T,F
+  19,19,T,F
+  20,20,T,F
+  21,21,T,F
+  22,22,T,F
+  23,23,T,F
+  24,24,T,F
+  25,25,T,F
+  26,26,T,F
+  27,27,T,F
+  28,28,T,F
+  29,29,T,F
+  30,30,T,F
+ gridsizex=8
+ gridsizey=8
+ exceptclassnames=1
+  EconvertError
+ exceptignore=1
+  0
+ modulenames=1
+  THEMESDIALOGFO
+ moduletypes=1
+  TTHEMESDIALOGFO
+ modulefiles=1
+  /C:/DATA/msegui project/whnide/msethemesdialog.mfm
+ mainfile=/c:/msegui/apps/ide/mseide.pas
+ targetfile=/c:/data/msegui project/whnide/whnide.exe
+ messageoutputfile=
+ copymessages=0
+ closemessages=1
+ checkmethods=1
+ makecommand=${COMPILER}
+ debugcommand=${DEBUGGER}
+ debugoptions=
+ debugtarget=
+ defaultmake=1
+ makeoptions=4
+  -l -Mobjfpc -Sh -FE../whnide -FU. -dmorecomponents
+  -gl
+  -B
+  -XX -Xs -OG2p3
+ makeoptionson=4
+  63
+  31
+  34
+  32
+ macroon=0
+ macronames=0
+ macrovalues=0
+ macrogroup=2
+ groupcomments=6
+  
+  
+  
+  
+  
+  
+ sourcedirs=4
+  ${MSELIBDIR}kernel/$TARGET/
+  ${MSELIBDIR}*/
+  /d:/msegui/apps/ide/
+  /e:/msegui project/whnide/
+ defines=0
+ defineson=0
+ unitdirs=5
+  /e:/msegui project/whnide/
+  ${MSELIBDIR}kernel/$TARGET/
+  ${MSELIBDIR}kernel/
+  ${MSELIBDIR}*/
+  /d:/msegui/apps/ide/
+ unitdirson=5
+  983103
+  65599
+  196671
+  65599
+  65599
+ unitpref=-Fu
+ incpref=-Fi
+ libpref=-Fl
+ objpref=-Fo
+ targpref=-o
+ sourcefilemasks=2
+  "*.pas" "*.dpr" "*.pp" "*.inc"
+  "*.c" "*.cc" "*.h"
+ syntaxdeffiles=2
+  ${SYNTAXDEFDIR}pascal.sdef
+  ${SYNTAXDEFDIR}cpp.sdef
+ filemasknames=3
+  Source
+  Forms
+  All Files
+ filemasks=3
+  "*.pp" "*.pas" "*.inc" "*.dpr"
+  *.mfm
+  *
+ toolsave=0
+ toolhide=0
+ toolparse=0
+ toolmenus=0
+ toolfiles=0
+ toolparams=0
+ fontalias=0
+ fontnames=0
+ fontheights=0
+ usercolors=20
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+  0
+ usercolorcomment=20
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+ showgrid=1
+ snaptogrid=1
+ moveonfirstclick=1
+ autoindent=1
+ blockindent=1
+ rightmarginon=1
+ rightmarginchars=80
+ tabstops=4
+ spacetabs=0
+ editfontname=mseide_source
+ editfontheight=0
+ editfontwidth=0
+ editfontextraspace=0
+ editfontantialiased=1
+ editmarkbrackets=1
+ backupfilecount=2
+ encoding=0
+ newprojectfiles=4
+  ${TEMPLATEDIR}default/project.pas
+  ${TEMPLATEDIR}default/main.pas
+  ${TEMPLATEDIR}default/main.mfm
+  ${TEMPLATEDIR}default/main_mfm.pas
+ newprojectfilesdest=4
+  ${%PROJECTNAME%}.pas
+  
+  
+  
+ expandprojectfilemacros=4
+  1
+  1
+  1
+  0
+ loadprojectfile=4
+  1
+  1
+  1
+  0
+ newprogramfile=${TEMPLATEDIR}default/program.pas
+ newunitfile=${TEMPLATEDIR}default/unit.pas
+ newmainfosource=${TEMPLATEDIR}default/mainform.pas
+ newmainfoform=${TEMPLATEDIR}default/mainform.mfm
+ newsimplefosource=${TEMPLATEDIR}default/simpleform.pas
+ newsimplefoform=${TEMPLATEDIR}default/simpleform.mfm
+ newdockingfosource=${TEMPLATEDIR}default/dockingform.pas
+ newdockingfoform=${TEMPLATEDIR}default/dockingform.mfm
+ newdatamodsource=${TEMPLATEDIR}default/datamodule.pas
+ newdatamodform=${TEMPLATEDIR}default/datamodule.mfm
+ newsubfosource=${TEMPLATEDIR}default/subform.pas
+ newsubfoform=${TEMPLATEDIR}default/subform.mfm
+ newreportsource=${TEMPLATEDIR}default/report.pas
+ newreportform=${TEMPLATEDIR}default/report.mfm
+ newinheritedsource=${TEMPLATEDIR}default/inheritedform.pas
+ newinheritedform=${TEMPLATEDIR}default/inheritedform.mfm
+ stoponexception=0
+ activateonbreak=1
+ showconsole=0
+ externalconsole=0
+ [breakpoints]
+ on=0
+ path=0
+ line=0
+ ignore=0
+ condition=0
+ panels=0
+ units=
+  (
+  modulefilenames=0
+  modulenames=0
+  moduleclassnames=0
+  a=0,4132,0,Units
+  )
+ files=
+  (
+  a=0,4132,0,Files
+  )
+ [layout]
+ windowlayout=302
+  [mainfo]
+  stackedunder=
+  x=80
+  y=269
+  cx=1016
+  cy=701
+  wsize=3
+  active=1
+  visible=1
+  [mainfo.basedock]
+  splitdir=2
+  useroptions=6048
+  [mainfo.openfile]
+  filenames=0
+  filehistory=10
+   /E:/msegui project/whnide/beeport.pas
+   /D:/msegui/lib/common/db/msedbedit.pas
+   /E:/msegui project/whnide/msethemesdialog.mfm
+   /E:/msegui project/whnide/msethemesdialog.pas
+   /E:/msegui project/whnide/whndbnavigator.pas
+   /E:/msegui project/whnide/regmycomps.pas
+   /E:/msegui project/acosys/frmtransaction.pas
+   /E:/msegui project/inoutlibrary/inout.pas
+   /E:/msegui project/acosys/beeport.pas
+   /C:/msegui/lib/common/regcomponents/regeditwidgets.pas
+  filefilterindex=0
+  filecolwidth=174
+  [actionsmo.watchesonact]
+  checked=1
+  [actionsmo.bluedotsonact]
+  checked=1
+  [sourcefo]
+  splitdir=0
+  useroptions=2075
+  parent=mainfo.basedock
+  visible=1
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=473
+  cx=1280
+  cy=233
+  [debuggerfo]
+  splitdir=0
+  useroptions=3099
+  parent=mainfo.basedock
+  visible=1
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=236
+  cx=1280
+  cy=234
+  [componentpalettefo]
+  splitdir=0
+  useroptions=3099
+  parent=mainfo.basedock
+  visible=1
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=0
+  cx=1280
+  cy=233
+  [componentpalettefo.componentpages]
+  activetab=9
+  [messagefo]
+  splitdir=0
+  useroptions=2075
+  parent=mainfo.basedock
+  visible=0
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=532
+  cx=1280
+  cy=174
+  [watchfo]
+  splitdir=0
+  useroptions=3099
+  stackedunder=targetconsolefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=910
+  y=451
+  cx=313
+  cy=70
+  wsize=0
+  active=0
+  visible=0
+  [watchfo.grid]
+  width0=13
+  values1=0
+  width1=152
+  values2=0
+  [watchfo.watchon]
+  [watchfo.expression]
+  [watchfo.watcheson]
+  value=1
+  [objectinspectorfo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=formdesignerfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=704
+  y=134
+  cx=316
+  cy=575
+  wsize=0
+  active=0
+  visible=1
+  [objectinspectorfo.grid]
+  width0=113
+  width1=187
+  [breakpointsfo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=watchpointsfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=107
+  y=404
+  cx=477
+  cy=128
+  wsize=0
+  active=0
+  visible=0
+  [breakpointsfo.bkptson]
+  value=1
+  [watchpointsfo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=stackfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=537
+  y=26
+  cx=483
+  cy=210
+  wsize=0
+  active=0
+  visible=0
+  [watchpointsfo.grid]
+  width0=16
+  values1=1
+   0
+  width1=33
+  values2=1
+   pinteger(0x126c6b4)^
+  width2=239
+  width4=34
+  values5=1
+   0
+  width5=38
+  values6=1
+   
+  width6=103
+  [stackfo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=watchfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=407
+  y=349
+  cx=254
+  cy=180
+  wsize=0
+  active=0
+  visible=0
+  [projecttreefo]
+  splitdir=0
+  useroptions=27
+  stackedunder=cpufo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=321
+  y=101
+  cx=698
+  cy=413
+  wsize=0
+  active=0
+  visible=0
+  [findinfilefo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=objectinspectorfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=26
+  cx=1024
+  cy=708
+  [cpufo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=disassfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=192
+  y=451
+  cx=257
+  cy=188
+  wsize=0
+  active=0
+  visible=0
+  [disassfo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=breakpointsfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=162
+  y=502
+  cx=564
+  cy=210
+  wsize=0
+  active=0
+  visible=0
+  [threadsfo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=projecttreefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=37
+  y=270
+  cx=349
+  cy=276
+  wsize=0
+  active=0
+  visible=0
+  [targetconsolefo]
+  splitdir=0
+  useroptions=2075
+  stackedunder=findinfilefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=116
+  y=297
+  cx=904
+  cy=347
+  wsize=0
+  active=0
+  visible=0
+ [edit]
+ hintwidth=314
+ hintheight=188
+ autoindent=1
+ blockindent=1
+ rightmarginon=1
+ rightmarginchars=80
+ tabstops=4
+ finddtext=inport32
+ findhistory=10
+  inport32
+  inport
+  beginupdate
+  buttons
+  menu
+  tgriddatalink
+  dbnavigatorwidth
+  foptions
+  tdbnavigator
+  tcomponent1
+ findoptions=2
+ editpos=6
+  0,-1073741823
+  0,-1073741823
+  0,-1073741823
+  33,19
+  0,-1073741823
+  14,28
+ bookmarks0=0
+ bookmarks1=0
+ bookmarks2=0
+ bookmarks3=0
+ bookmarks4=0
+ bookmarks5=0
+ sourcefiles=6
+  /E:/msegui project/whnide/regmycomps.pas
+  /E:/msegui project/whnide/whndbnavigator.pas
+  /D:/msegui/lib/common/kernel/msemenuwidgets.pas
+  /C:/DATA/msegui project/whnide/msethemesdialog.pas
+  /D:/msegui/lib/common/db/msedbedit.pas
+  /C:/DATA/msegui project/whnide/beeport.pas
+ relpaths=6
+  regmycomps.pas
+  whndbnavigator.pas
+  ../../../D:/msegui/lib/common/kernel/msemenuwidgets.pas
+  msethemesdialog.pas
+  ../../../D:/msegui/lib/common/db/msedbedit.pas
+  beeport.pas
+ ismoduletexts=6
+  0
+  0
+  0
+  0
+  0
+  0
+ modules=1
+  /C:/DATA/msegui project/whnide/msethemesdialog.mfm
+ visiblemodules=1
+  1
+ [sourcefo.tabwidget]
+ order=6
+  1
+  3
+  0
+  5
+  2
+  4
+ tabsize=102
+ firsttab=0
+ index=1
+ [components]
+ [selecteditpage]
+ colwidth=100
+ x=0
+ y=0
+ cx=0
+ cy=0
+ [progparams]
+ parameters=
+ progparamhistory=0
+ workingdirectory=
+ envvarons=0
+ envvarnames=0
+ envvarvalues=0
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/main.mfm mseide-msegui-1.8/contrib/wahono/themesdialog/sample/main.mfm
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/main.mfm	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/sample/main.mfm	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,236 ----
+ object mainfo: tmainfo
+   optionswidget = [ow_arrowfocus, ow_subfocus, ow_destroywidgets, ow_hinton, ow_autoscale]
+   bounds_x = 188
+   bounds_y = 230
+   bounds_cx = 428
+   bounds_cy = 279
+   taborder = 1
+   container.optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_subfocus, ow_mousetransparent, ow_destroywidgets, ow_autoscale]
+   container.bounds_x = 0
+   container.bounds_y = 0
+   container.bounds_cx = 428
+   container.bounds_cy = 279
+   container.frame.dummy = 0
+   optionswindow = [wo_groupleader]
+   options = [fo_main, fo_terminateonclose, fo_autoreadstat, fo_autowritestat, fo_savepos, fo_savestate]
+   statfile = tstatfile1
+   icon.transparency = -2147483648
+   moduleclassname = 'tmseform'
+   object tbutton1: tbutton
+     bounds_x = 16
+     bounds_y = 176
+     bounds_cx = 98
+     bounds_cy = 19
+     face.template = tfacecomp1
+     face.dummy = 0
+     state = [as_localcaption, as_localonexecute]
+     caption = 'Change &Themes'
+     onexecute = changethemes
+   end
+   object tgroupbox1: tgroupbox
+     bounds_x = 8
+     bounds_y = 8
+     bounds_cx = 226
+     bounds_cy = 154
+     frame.caption = 'Sample'
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       8
+       0
+       0
+     )
+     taborder = 1
+     object tstringedit1: tstringedit
+       optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+       bounds_x = 16
+       bounds_y = 24
+       bounds_cx = 180
+       bounds_cy = 35
+       frame.caption = '&Name'
+       frame.dummy = 0
+       frame.outerframe = (
+         0
+         16
+         0
+         0
+       )
+       statfile = tstatfile1
+       reffontheight = 13
+     end
+     object tintegeredit1: tintegeredit
+       optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+       bounds_x = 16
+       bounds_y = 64
+       bounds_cx = 100
+       bounds_cy = 35
+       frame.caption = '&Age'
+       frame.dummy = 0
+       frame.outerframe = (
+         0
+         16
+         0
+         0
+       )
+       taborder = 1
+       reffontheight = 13
+     end
+     object tcalendardatetimeedit1: tcalendardatetimeedit
+       optionswidget = [ow_mousefocus, ow_tabfocus, ow_arrowfocus, ow_destroywidgets, ow_fontglyphheight, ow_autoscale]
+       bounds_x = 16
+       bounds_y = 104
+       bounds_cx = 148
+       bounds_cy = 35
+       frame.caption = '&Birth Day'
+       frame.dummy = 0
+       frame.outerframe = (
+         0
+         16
+         0
+         0
+       )
+       taborder = 2
+       reffontheight = 13
+       ma = 365000.99998999998
+     end
+   end
+   object tbutton2: tbutton
+     bounds_x = 128
+     bounds_y = 176
+     bounds_cx = 98
+     bounds_cy = 19
+     face.template = tfacecomp1
+     face.dummy = 0
+     taborder = 2
+     state = [as_localcaption, as_localonexecute]
+     caption = '&Close'
+     modalresult = mr_windowclosed
+   end
+   object tbutton3: tbutton
+     bounds_x = 240
+     bounds_y = 16
+     bounds_cx = 178
+     bounds_cy = 19
+     taborder = 3
+     state = [as_localcaption]
+     caption = 'Default Button'
+   end
+   object tbutton4: tbutton
+     bounds_x = 240
+     bounds_y = 40
+     bounds_cx = 178
+     bounds_cy = 19
+     color = -1879048189
+     taborder = 4
+     state = [as_localcaption]
+     caption = 'Button with cl_light'
+   end
+   object tgroupbox2: tgroupbox
+     bounds_x = 240
+     bounds_y = 66
+     bounds_cx = 178
+     bounds_cy = 105
+     frame.caption = 'Frame with Face'
+     frame.captiondist = 0
+     frame.dummy = 0
+     frame.outerframe = (
+       0
+       15
+       0
+       0
+     )
+     face.localprops = [fal_fadirection]
+     face.template = tfacecomp1
+     face.dummy = 0
+     taborder = 5
+     object tbutton5: tbutton
+       bounds_x = 10
+       bounds_y = 49
+       bounds_cx = 155
+       bounds_cy = 19
+       state = [as_localcaption]
+       caption = 'Default Button'
+     end
+     object tbutton6: tbutton
+       bounds_x = 10
+       bounds_y = 72
+       bounds_cx = 155
+       bounds_cy = 19
+       color = -1879048189
+       taborder = 1
+       state = [as_localcaption]
+       caption = 'Button with cl_light'
+     end
+     object tlabel1: tlabel
+       bounds_x = 12
+       bounds_y = 28
+       bounds_cx = 123
+       bounds_cy = 13
+       color = -2147483645
+       taborder = 2
+       caption = 'Sample caption with tlabel'
+       reffontheight = 13
+     end
+   end
+   object tslider1: tslider
+     bounds_x = 240
+     bounds_y = 177
+     bounds_cx = 176
+     frame.dummy = 0
+     taborder = 6
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object tslider2: tslider
+     bounds_x = 240
+     bounds_y = 201
+     bounds_cx = 176
+     frame.dummy = 0
+     taborder = 7
+     scrollbar.facebutton.template = tfacecomp1
+     scrollbar.facebutton.dummy = 0
+     scrollbar.faceendbutton.template = tfacecomp1
+     scrollbar.faceendbutton.dummy = 0
+     scrollbar.face.image.transparency = -2147483648
+     scrollbar.face.fade_pos.count = 2
+     scrollbar.face.fade_pos.items = (
+       0
+       1
+     )
+     scrollbar.face.fade_color.count = 2
+     scrollbar.face.fade_color.items = (
+       -1879048189
+       -1879048191
+     )
+     scrollbar.face.fade_direction = gd_down
+     scrollbar.face.fade_transparency = -2147483648
+     scrollbar.face.dummy = 0
+   end
+   object tthemesedit1: tthemesedit
+     statfile = tstatfile1
+     top = 255
+   end
+   object tfacecomp1: tfacecomp
+     template.image.transparency = -2147483648
+     template.fade_pos.count = 2
+     template.fade_pos.items = (
+       0
+       1
+     )
+     template.fade_color.count = 2
+     template.fade_color.items = (
+       -1879048189
+       -1879048191
+     )
+     template.fade_direction = gd_down
+     template.fade_transparency = -2147483648
+     left = 184
+     top = 255
+   end
+   object tstatfile1: tstatfile
+     filename = 'whn.sta'
+     left = 96
+     top = 255
+   end
+ end
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/main_mfm.pas mseide-msegui-1.8/contrib/wahono/themesdialog/sample/main_mfm.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/main_mfm.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/sample/main_mfm.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,216 ----
+ unit main_mfm;
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ 
+ interface
+ 
+ implementation
+ uses
+  mseclasses,main;
+ 
+ const
+  objdata: record size: integer; data: array[0..3973] of byte end =
+       (size: 3974; data: (
+   84,80,70,48,7,116,109,97,105,110,102,111,6,109,97,105,110,102,111,13,
+   111,112,116,105,111,110,115,119,105,100,103,101,116,11,13,111,119,95,97,114,
+   114,111,119,102,111,99,117,115,11,111,119,95,115,117,98,102,111,99,117,115,
+   17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,9,111,
+   119,95,104,105,110,116,111,110,12,111,119,95,97,117,116,111,115,99,97,108,
+   101,0,8,98,111,117,110,100,115,95,120,3,188,0,8,98,111,117,110,100,
+   115,95,121,3,230,0,9,98,111,117,110,100,115,95,99,120,3,172,1,9,
+   98,111,117,110,100,115,95,99,121,3,23,1,8,116,97,98,111,114,100,101,
+   114,2,1,23,99,111,110,116,97,105,110,101,114,46,111,112,116,105,111,110,
+   115,119,105,100,103,101,116,11,13,111,119,95,109,111,117,115,101,102,111,99,
+   117,115,11,111,119,95,116,97,98,102,111,99,117,115,13,111,119,95,97,114,
+   114,111,119,102,111,99,117,115,11,111,119,95,115,117,98,102,111,99,117,115,
+   19,111,119,95,109,111,117,115,101,116,114,97,110,115,112,97,114,101,110,116,
+   17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,12,111,
+   119,95,97,117,116,111,115,99,97,108,101,0,18,99,111,110,116,97,105,110,
+   101,114,46,98,111,117,110,100,115,95,120,2,0,18,99,111,110,116,97,105,
+   110,101,114,46,98,111,117,110,100,115,95,121,2,0,19,99,111,110,116,97,
+   105,110,101,114,46,98,111,117,110,100,115,95,99,120,3,172,1,19,99,111,
+   110,116,97,105,110,101,114,46,98,111,117,110,100,115,95,99,121,3,23,1,
+   21,99,111,110,116,97,105,110,101,114,46,102,114,97,109,101,46,100,117,109,
+   109,121,2,0,13,111,112,116,105,111,110,115,119,105,110,100,111,119,11,14,
+   119,111,95,103,114,111,117,112,108,101,97,100,101,114,0,7,111,112,116,105,
+   111,110,115,11,7,102,111,95,109,97,105,110,19,102,111,95,116,101,114,109,
+   105,110,97,116,101,111,110,99,108,111,115,101,15,102,111,95,97,117,116,111,
+   114,101,97,100,115,116,97,116,16,102,111,95,97,117,116,111,119,114,105,116,
+   101,115,116,97,116,10,102,111,95,115,97,118,101,112,111,115,12,102,111,95,
+   115,97,118,101,115,116,97,116,101,0,8,115,116,97,116,102,105,108,101,7,
+   10,116,115,116,97,116,102,105,108,101,49,17,105,99,111,110,46,116,114,97,
+   110,115,112,97,114,101,110,99,121,4,0,0,0,128,15,109,111,100,117,108,
+   101,99,108,97,115,115,110,97,109,101,6,8,116,109,115,101,102,111,114,109,
+   0,7,116,98,117,116,116,111,110,8,116,98,117,116,116,111,110,49,8,98,
+   111,117,110,100,115,95,120,2,16,8,98,111,117,110,100,115,95,121,3,176,
+   0,9,98,111,117,110,100,115,95,99,120,2,98,9,98,111,117,110,100,115,
+   95,99,121,2,19,13,102,97,99,101,46,116,101,109,112,108,97,116,101,7,
+   10,116,102,97,99,101,99,111,109,112,49,10,102,97,99,101,46,100,117,109,
+   109,121,2,0,5,115,116,97,116,101,11,15,97,115,95,108,111,99,97,108,
+   99,97,112,116,105,111,110,17,97,115,95,108,111,99,97,108,111,110,101,120,
+   101,99,117,116,101,0,7,99,97,112,116,105,111,110,6,14,67,104,97,110,
+   103,101,32,38,84,104,101,109,101,115,9,111,110,101,120,101,99,117,116,101,
+   7,12,99,104,97,110,103,101,116,104,101,109,101,115,0,0,9,116,103,114,
+   111,117,112,98,111,120,10,116,103,114,111,117,112,98,111,120,49,8,98,111,
+   117,110,100,115,95,120,2,8,8,98,111,117,110,100,115,95,121,2,8,9,
+   98,111,117,110,100,115,95,99,120,3,226,0,9,98,111,117,110,100,115,95,
+   99,121,3,154,0,13,102,114,97,109,101,46,99,97,112,116,105,111,110,6,
+   6,83,97,109,112,108,101,11,102,114,97,109,101,46,100,117,109,109,121,2,
+   0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,97,109,101,1,2,
+   0,2,8,2,0,2,0,0,8,116,97,98,111,114,100,101,114,2,1,0,
+   11,116,115,116,114,105,110,103,101,100,105,116,12,116,115,116,114,105,110,103,
+   101,100,105,116,49,13,111,112,116,105,111,110,115,119,105,100,103,101,116,11,
+   13,111,119,95,109,111,117,115,101,102,111,99,117,115,11,111,119,95,116,97,
+   98,102,111,99,117,115,13,111,119,95,97,114,114,111,119,102,111,99,117,115,
+   17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,18,111,
+   119,95,102,111,110,116,103,108,121,112,104,104,101,105,103,104,116,12,111,119,
+   95,97,117,116,111,115,99,97,108,101,0,8,98,111,117,110,100,115,95,120,
+   2,16,8,98,111,117,110,100,115,95,121,2,24,9,98,111,117,110,100,115,
+   95,99,120,3,180,0,9,98,111,117,110,100,115,95,99,121,2,35,13,102,
+   114,97,109,101,46,99,97,112,116,105,111,110,6,5,38,78,97,109,101,11,
+   102,114,97,109,101,46,100,117,109,109,121,2,0,16,102,114,97,109,101,46,
+   111,117,116,101,114,102,114,97,109,101,1,2,0,2,16,2,0,2,0,0,
+   8,115,116,97,116,102,105,108,101,7,10,116,115,116,97,116,102,105,108,101,
+   49,13,114,101,102,102,111,110,116,104,101,105,103,104,116,2,13,0,0,12,
+   116,105,110,116,101,103,101,114,101,100,105,116,13,116,105,110,116,101,103,101,
+   114,101,100,105,116,49,13,111,112,116,105,111,110,115,119,105,100,103,101,116,
+   11,13,111,119,95,109,111,117,115,101,102,111,99,117,115,11,111,119,95,116,
+   97,98,102,111,99,117,115,13,111,119,95,97,114,114,111,119,102,111,99,117,
+   115,17,111,119,95,100,101,115,116,114,111,121,119,105,100,103,101,116,115,18,
+   111,119,95,102,111,110,116,103,108,121,112,104,104,101,105,103,104,116,12,111,
+   119,95,97,117,116,111,115,99,97,108,101,0,8,98,111,117,110,100,115,95,
+   120,2,16,8,98,111,117,110,100,115,95,121,2,64,9,98,111,117,110,100,
+   115,95,99,120,2,100,9,98,111,117,110,100,115,95,99,121,2,35,13,102,
+   114,97,109,101,46,99,97,112,116,105,111,110,6,4,38,65,103,101,11,102,
+   114,97,109,101,46,100,117,109,109,121,2,0,16,102,114,97,109,101,46,111,
+   117,116,101,114,102,114,97,109,101,1,2,0,2,16,2,0,2,0,0,8,
+   116,97,98,111,114,100,101,114,2,1,13,114,101,102,102,111,110,116,104,101,
+   105,103,104,116,2,13,0,0,21,116,99,97,108,101,110,100,97,114,100,97,
+   116,101,116,105,109,101,101,100,105,116,22,116,99,97,108,101,110,100,97,114,
+   100,97,116,101,116,105,109,101,101,100,105,116,49,13,111,112,116,105,111,110,
+   115,119,105,100,103,101,116,11,13,111,119,95,109,111,117,115,101,102,111,99,
+   117,115,11,111,119,95,116,97,98,102,111,99,117,115,13,111,119,95,97,114,
+   114,111,119,102,111,99,117,115,17,111,119,95,100,101,115,116,114,111,121,119,
+   105,100,103,101,116,115,18,111,119,95,102,111,110,116,103,108,121,112,104,104,
+   101,105,103,104,116,12,111,119,95,97,117,116,111,115,99,97,108,101,0,8,
+   98,111,117,110,100,115,95,120,2,16,8,98,111,117,110,100,115,95,121,2,
+   104,9,98,111,117,110,100,115,95,99,120,3,148,0,9,98,111,117,110,100,
+   115,95,99,121,2,35,13,102,114,97,109,101,46,99,97,112,116,105,111,110,
+   6,10,38,66,105,114,116,104,32,68,97,121,11,102,114,97,109,101,46,100,
+   117,109,109,121,2,0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,
+   97,109,101,1,2,0,2,16,2,0,2,0,0,8,116,97,98,111,114,100,
+   101,114,2,2,13,114,101,102,102,111,110,116,104,101,105,103,104,116,2,13,
+   2,109,97,5,0,72,7,235,255,31,57,178,17,64,0,0,0,7,116,98,
+   117,116,116,111,110,8,116,98,117,116,116,111,110,50,8,98,111,117,110,100,
+   115,95,120,3,128,0,8,98,111,117,110,100,115,95,121,3,176,0,9,98,
+   111,117,110,100,115,95,99,120,2,98,9,98,111,117,110,100,115,95,99,121,
+   2,19,13,102,97,99,101,46,116,101,109,112,108,97,116,101,7,10,116,102,
+   97,99,101,99,111,109,112,49,10,102,97,99,101,46,100,117,109,109,121,2,
+   0,8,116,97,98,111,114,100,101,114,2,2,5,115,116,97,116,101,11,15,
+   97,115,95,108,111,99,97,108,99,97,112,116,105,111,110,17,97,115,95,108,
+   111,99,97,108,111,110,101,120,101,99,117,116,101,0,7,99,97,112,116,105,
+   111,110,6,6,38,67,108,111,115,101,11,109,111,100,97,108,114,101,115,117,
+   108,116,7,15,109,114,95,119,105,110,100,111,119,99,108,111,115,101,100,0,
+   0,7,116,98,117,116,116,111,110,8,116,98,117,116,116,111,110,51,8,98,
+   111,117,110,100,115,95,120,3,240,0,8,98,111,117,110,100,115,95,121,2,
+   16,9,98,111,117,110,100,115,95,99,120,3,178,0,9,98,111,117,110,100,
+   115,95,99,121,2,19,8,116,97,98,111,114,100,101,114,2,3,5,115,116,
+   97,116,101,11,15,97,115,95,108,111,99,97,108,99,97,112,116,105,111,110,
+   0,7,99,97,112,116,105,111,110,6,14,68,101,102,97,117,108,116,32,66,
+   117,116,116,111,110,0,0,7,116,98,117,116,116,111,110,8,116,98,117,116,
+   116,111,110,52,8,98,111,117,110,100,115,95,120,3,240,0,8,98,111,117,
+   110,100,115,95,121,2,40,9,98,111,117,110,100,115,95,99,120,3,178,0,
+   9,98,111,117,110,100,115,95,99,121,2,19,5,99,111,108,111,114,4,3,
+   0,0,144,8,116,97,98,111,114,100,101,114,2,4,5,115,116,97,116,101,
+   11,15,97,115,95,108,111,99,97,108,99,97,112,116,105,111,110,0,7,99,
+   97,112,116,105,111,110,6,20,66,117,116,116,111,110,32,119,105,116,104,32,
+   99,108,95,108,105,103,104,116,0,0,9,116,103,114,111,117,112,98,111,120,
+   10,116,103,114,111,117,112,98,111,120,50,8,98,111,117,110,100,115,95,120,
+   3,240,0,8,98,111,117,110,100,115,95,121,2,66,9,98,111,117,110,100,
+   115,95,99,120,3,178,0,9,98,111,117,110,100,115,95,99,121,2,105,13,
+   102,114,97,109,101,46,99,97,112,116,105,111,110,6,15,70,114,97,109,101,
+   32,119,105,116,104,32,70,97,99,101,17,102,114,97,109,101,46,99,97,112,
+   116,105,111,110,100,105,115,116,2,0,11,102,114,97,109,101,46,100,117,109,
+   109,121,2,0,16,102,114,97,109,101,46,111,117,116,101,114,102,114,97,109,
+   101,1,2,0,2,15,2,0,2,0,0,15,102,97,99,101,46,108,111,99,
+   97,108,112,114,111,112,115,11,15,102,97,108,95,102,97,100,105,114,101,99,
+   116,105,111,110,0,13,102,97,99,101,46,116,101,109,112,108,97,116,101,7,
+   10,116,102,97,99,101,99,111,109,112,49,10,102,97,99,101,46,100,117,109,
+   109,121,2,0,8,116,97,98,111,114,100,101,114,2,5,0,7,116,98,117,
+   116,116,111,110,8,116,98,117,116,116,111,110,53,8,98,111,117,110,100,115,
+   95,120,2,10,8,98,111,117,110,100,115,95,121,2,49,9,98,111,117,110,
+   100,115,95,99,120,3,155,0,9,98,111,117,110,100,115,95,99,121,2,19,
+   5,115,116,97,116,101,11,15,97,115,95,108,111,99,97,108,99,97,112,116,
+   105,111,110,0,7,99,97,112,116,105,111,110,6,14,68,101,102,97,117,108,
+   116,32,66,117,116,116,111,110,0,0,7,116,98,117,116,116,111,110,8,116,
+   98,117,116,116,111,110,54,8,98,111,117,110,100,115,95,120,2,10,8,98,
+   111,117,110,100,115,95,121,2,72,9,98,111,117,110,100,115,95,99,120,3,
+   155,0,9,98,111,117,110,100,115,95,99,121,2,19,5,99,111,108,111,114,
+   4,3,0,0,144,8,116,97,98,111,114,100,101,114,2,1,5,115,116,97,
+   116,101,11,15,97,115,95,108,111,99,97,108,99,97,112,116,105,111,110,0,
+   7,99,97,112,116,105,111,110,6,20,66,117,116,116,111,110,32,119,105,116,
+   104,32,99,108,95,108,105,103,104,116,0,0,6,116,108,97,98,101,108,7,
+   116,108,97,98,101,108,49,8,98,111,117,110,100,115,95,120,2,12,8,98,
+   111,117,110,100,115,95,121,2,28,9,98,111,117,110,100,115,95,99,120,2,
+   123,9,98,111,117,110,100,115,95,99,121,2,13,5,99,111,108,111,114,4,
+   3,0,0,128,8,116,97,98,111,114,100,101,114,2,2,7,99,97,112,116,
+   105,111,110,6,26,83,97,109,112,108,101,32,99,97,112,116,105,111,110,32,
+   119,105,116,104,32,116,108,97,98,101,108,13,114,101,102,102,111,110,116,104,
+   101,105,103,104,116,2,13,0,0,0,7,116,115,108,105,100,101,114,8,116,
+   115,108,105,100,101,114,49,8,98,111,117,110,100,115,95,120,3,240,0,8,
+   98,111,117,110,100,115,95,121,3,177,0,9,98,111,117,110,100,115,95,99,
+   120,3,176,0,11,102,114,97,109,101,46,100,117,109,109,121,2,0,8,116,
+   97,98,111,114,100,101,114,2,6,33,115,99,114,111,108,108,98,97,114,46,
+   102,97,99,101,46,105,109,97,103,101,46,116,114,97,110,115,112,97,114,101,
+   110,99,121,4,0,0,0,128,32,115,99,114,111,108,108,98,97,114,46,102,
+   97,99,101,46,102,97,100,101,95,116,114,97,110,115,112,97,114,101,110,99,
+   121,4,0,0,0,128,20,115,99,114,111,108,108,98,97,114,46,102,97,99,
+   101,46,100,117,109,109,121,2,0,0,0,7,116,115,108,105,100,101,114,8,
+   116,115,108,105,100,101,114,50,8,98,111,117,110,100,115,95,120,3,240,0,
+   8,98,111,117,110,100,115,95,121,3,201,0,9,98,111,117,110,100,115,95,
+   99,120,3,176,0,11,102,114,97,109,101,46,100,117,109,109,121,2,0,8,
+   116,97,98,111,114,100,101,114,2,7,29,115,99,114,111,108,108,98,97,114,
+   46,102,97,99,101,98,117,116,116,111,110,46,116,101,109,112,108,97,116,101,
+   7,10,116,102,97,99,101,99,111,109,112,49,26,115,99,114,111,108,108,98,
+   97,114,46,102,97,99,101,98,117,116,116,111,110,46,100,117,109,109,121,2,
+   0,32,115,99,114,111,108,108,98,97,114,46,102,97,99,101,101,110,100,98,
+   117,116,116,111,110,46,116,101,109,112,108,97,116,101,7,10,116,102,97,99,
+   101,99,111,109,112,49,29,115,99,114,111,108,108,98,97,114,46,102,97,99,
+   101,101,110,100,98,117,116,116,111,110,46,100,117,109,109,121,2,0,33,115,
+   99,114,111,108,108,98,97,114,46,102,97,99,101,46,105,109,97,103,101,46,
+   116,114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,29,115,99,
+   114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,112,111,
+   115,46,99,111,117,110,116,2,2,29,115,99,114,111,108,108,98,97,114,46,
+   102,97,99,101,46,102,97,100,101,95,112,111,115,46,105,116,101,109,115,1,
+   2,0,2,1,0,31,115,99,114,111,108,108,98,97,114,46,102,97,99,101,
+   46,102,97,100,101,95,99,111,108,111,114,46,99,111,117,110,116,2,2,31,
+   115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,100,101,95,
+   99,111,108,111,114,46,105,116,101,109,115,1,4,3,0,0,144,4,1,0,
+   0,144,0,29,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,
+   97,100,101,95,100,105,114,101,99,116,105,111,110,7,7,103,100,95,100,111,
+   119,110,32,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,102,97,
+   100,101,95,116,114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,128,
+   20,115,99,114,111,108,108,98,97,114,46,102,97,99,101,46,100,117,109,109,
+   121,2,0,0,0,11,116,116,104,101,109,101,115,101,100,105,116,12,116,116,
+   104,101,109,101,115,101,100,105,116,49,8,115,116,97,116,102,105,108,101,7,
+   10,116,115,116,97,116,102,105,108,101,49,3,116,111,112,3,255,0,0,0,
+   9,116,102,97,99,101,99,111,109,112,10,116,102,97,99,101,99,111,109,112,
+   49,27,116,101,109,112,108,97,116,101,46,105,109,97,103,101,46,116,114,97,
+   110,115,112,97,114,101,110,99,121,4,0,0,0,128,23,116,101,109,112,108,
+   97,116,101,46,102,97,100,101,95,112,111,115,46,99,111,117,110,116,2,2,
+   23,116,101,109,112,108,97,116,101,46,102,97,100,101,95,112,111,115,46,105,
+   116,101,109,115,1,2,0,2,1,0,25,116,101,109,112,108,97,116,101,46,
+   102,97,100,101,95,99,111,108,111,114,46,99,111,117,110,116,2,2,25,116,
+   101,109,112,108,97,116,101,46,102,97,100,101,95,99,111,108,111,114,46,105,
+   116,101,109,115,1,4,3,0,0,144,4,1,0,0,144,0,23,116,101,109,
+   112,108,97,116,101,46,102,97,100,101,95,100,105,114,101,99,116,105,111,110,
+   7,7,103,100,95,100,111,119,110,26,116,101,109,112,108,97,116,101,46,102,
+   97,100,101,95,116,114,97,110,115,112,97,114,101,110,99,121,4,0,0,0,
+   128,4,108,101,102,116,3,184,0,3,116,111,112,3,255,0,0,0,9,116,
+   115,116,97,116,102,105,108,101,10,116,115,116,97,116,102,105,108,101,49,8,
+   102,105,108,101,110,97,109,101,6,7,119,104,110,46,115,116,97,4,108,101,
+   102,116,2,96,3,116,111,112,3,255,0,0,0,0)
+  );
+ 
+ initialization
+  registerobjectdata(@objdata,tmainfo,'');
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/main.pas mseide-msegui-1.8/contrib/wahono/themesdialog/sample/main.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/main.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/sample/main.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,41 ----
+ unit main;
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ interface
+ uses
+  msegui,mseclasses,mseforms,msedrawtext,mseevent,msegraphics,msesimplewidgets,
+  msestrings,msewidgets,msedataedits,msedatalist,msedropdownlist,mseformatstr,
+  mseinplaceedit,msestat,msestatfile,msetypes,msewidgetgrid,msethemesdialog,
+  msearrayprops,msegraphutils,mseguiglob,msebitmap,msegraphedits;
+ 
+ type
+  tmainfo = class(tmseform)
+    tbutton1: tbutton;
+    tbutton2: tbutton;
+    tbutton3: tbutton;
+    tbutton4: tbutton;
+    tbutton5: tbutton;
+    tbutton6: tbutton;
+    tcalendardatetimeedit1: tcalendardatetimeedit;
+    tfacecomp1: tfacecomp;
+    tgroupbox1: tgroupbox;
+    tgroupbox2: tgroupbox;
+    tintegeredit1: tintegeredit;
+    tlabel1: tlabel;
+    tslider1: tslider;
+    tslider2: tslider;
+    tstatfile1: tstatfile;
+    tstringedit1: tstringedit;
+    tthemesedit1: tthemesedit;
+    procedure changethemes(const sender: TObject);
+  end;
+ var
+  mainfo: tmainfo;
+ implementation
+ uses
+  main_mfm;
+ procedure tmainfo.changethemes(const sender: TObject);
+ begin
+ 	tthemesedit1.showdialog;
+ end;
+ 
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/themessample.pas mseide-msegui-1.8/contrib/wahono/themesdialog/sample/themessample.pas
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/themessample.pas	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/sample/themessample.pas	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,11 ----
+ program themessample;
+ {$ifdef FPC}{$mode objfpc}{$h+}{$INTERFACES CORBA}{$endif}
+ {$ifdef FPC}
+  {$ifdef mswindows}{$apptype gui}{$endif}
+ {$endif}
+ uses
+  {$ifdef FPC}{$ifdef linux}cthreads,{$endif}{$endif}msegui,mseforms,main;
+ begin
+  application.createform(tmainfo,mainfo);
+  application.run;
+ end.
diff -N -c -r mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/themessample.prj mseide-msegui-1.8/contrib/wahono/themesdialog/sample/themessample.prj
*** mseide-msegui-1.8.orig/contrib/wahono/themesdialog/sample/themessample.prj	1970-01-01 01:00:00.000000000 +0100
--- mseide-msegui-1.8/contrib/wahono/themesdialog/sample/themessample.prj	2007-11-15 22:57:00.000000000 +0100
***************
*** 0 ****
--- 1,591 ----
+ [componentpalette]
+ order0=0
+ order1=0
+ order2=0
+ order3=0
+ order4=0
+ order5=0
+ order6=0
+ order7=0
+ order8=0
+ order9=0
+ [projectoptions]
+ projectdir=/C:/fp/LAT8
+ options=41
+  [projectoptionsfo]
+  stackedunder=
+  x=151
+  y=68
+  cx=821
+  cy=572
+  [projectoptionsfo.tabwidget]
+  firsttab=0
+  index=3
+  [projectoptionsfo.macrogrid]
+  width0=13
+  width1=13
+  width2=13
+  width3=13
+  width4=13
+  width5=13
+  width6=146
+  width7=583
+  [projectoptionsfo.macrosplitter]
+  x=0
+  y=178
+  [projectoptionsfo.fontaliasgrid]
+  values0=0
+  width0=98
+  values1=0
+  width1=684
+  values2=0
+  width2=30
+  [projectoptionsfo.grid]
+  width0=231
+  [projectoptionsfo.makesplitter]
+  x=0
+  y=161
+  [projectoptionsfo.ttabwidget1]
+  firsttab=0
+  index=0
+  [projectoptionsfo.exceptionsgrid]
+  width0=47
+  values1=1
+   EconvertError
+  width1=764
+ sigsettings=27
+  1,1,T,F
+  3,3,T,F
+  4,4,T,F
+  6,6,T,F
+  7,7,T,F
+  8,8,T,F
+  9,9,T,F
+  10,10,T,F
+  11,11,T,F
+  12,12,T,F
+  13,13,T,F
+  15,15,T,F
+  16,16,T,F
+  17,17,F,F
+  18,18,T,F
+  19,19,T,F
+  20,20,T,F
+  21,21,T,F
+  22,22,T,F
+  23,23,T,F
+  24,24,T,F
+  25,25,T,F
+  26,26,T,F
+  27,27,T,F
+  28,28,T,F
+  29,29,T,F
+  30,30,T,F
+ gridsizex=8
+ gridsizey=8
+ exceptclassnames=1
+  EconvertError
+ exceptignore=1
+  0
+ modulenames=1
+  MAINFO
+ moduletypes=1
+  TMAINFO
+ modulefiles=1
+  /C:/fp/LAT8/main.mfm
+ mainfile=ThemesSample.pas
+ targetfile=ThemesSample${EXEEXT}
+ messageoutputfile=
+ copymessages=0
+ closemessages=1
+ checkmethods=1
+ makecommand=${COMPILER}
+ debugcommand=${DEBUGGER}
+ debugoptions=
+ debugtarget=
+ defaultmake=1
+ makeoptions=4
+  -l -Mobjfpc -Sh
+  -gl
+  -B
+  -OG2p3 -XX -Xs
+ makeoptionson=4
+  63
+  31
+  34
+  32
+ macroon=0
+ macronames=0
+ macrovalues=0
+ macrogroup=0
+ groupcomments=6
+  
+  
+  
+  
+  
+  
+ sourcedirs=3
+  ${MSELIBDIR}kernel/$TARGET/
+  ${MSELIBDIR}*/
+  ./
+ defines=0
+ defineson=0
+ unitdirs=3
+  ${MSELIBDIR}kernel/$TARGET/
+  ${MSELIBDIR}kernel/
+  ${MSELIBDIR}*/
+ unitdirson=3
+  65599
+  196671
+  65599
+ sourcefilemasks=3
+  "*.pas" "*.dpr" "*.pp" "*.inc"
+  "*.c" "*.cc" "*.h"
+  "*.mfm"
+ syntaxdeffiles=3
+  ${SYNTAXDEFDIR}pascal.sdef
+  ${SYNTAXDEFDIR}cpp.sdef
+  ${SYNTAXDEFDIR}objecttext.sdef
+ fontalias=0
+ fontnames=0
+ fontheights=0
+ usercolors=0
+ usercolorcomment=0
+ showgrid=1
+ snaptogrid=1
+ moveonfirstclick=1
+ autoindent=1
+ blockindent=1
+ rightmarginon=1
+ rightmarginchars=80
+ tabstops=4
+ spacetabs=0
+ editfontname=mseide_source
+ editfontheight=0
+ editfontwidth=0
+ editfontextraspace=0
+ editfontantialiased=1
+ backupfilecount=2
+ encoding=0
+ newprojectfiles=4
+  ${TEMPLATEDIR}default/project.pas
+  ${TEMPLATEDIR}default/main.pas
+  ${TEMPLATEDIR}default/main.mfm
+  ${TEMPLATEDIR}default/main_mfm.pas
+ newprojectfilesdest=4
+  ${%PROJECTNAME%}.pas
+  
+  
+  
+ expandprojectfilemacros=4
+  1
+  1
+  1
+  0
+ loadprojectfile=4
+  1
+  1
+  1
+  0
+ newprogramfile=${TEMPLATEDIR}default/program.pas
+ newunitfile=${TEMPLATEDIR}default/unit.pas
+ newmainfosource=${TEMPLATEDIR}default/mainform.pas
+ newmainfoform=${TEMPLATEDIR}default/mainform.mfm
+ newsimplefosource=${TEMPLATEDIR}default/simpleform.pas
+ newsimplefoform=${TEMPLATEDIR}default/simpleform.mfm
+ newdockingfosource=${TEMPLATEDIR}default/dockingform.pas
+ newdockingfoform=${TEMPLATEDIR}default/dockingform.mfm
+ newdatamodsource=${TEMPLATEDIR}default/datamodule.pas
+ newdatamodform=${TEMPLATEDIR}default/datamodule.mfm
+ newsubfosource=${TEMPLATEDIR}default/subform.pas
+ newsubfoform=${TEMPLATEDIR}default/subform.mfm
+ newreportsource=${TEMPLATEDIR}default/report.pas
+ newreportform=${TEMPLATEDIR}default/report.mfm
+ newinheritedsource=${TEMPLATEDIR}default/inheritedform.pas
+ newinheritedform=${TEMPLATEDIR}default/inheritedform.mfm
+ stoponexception=0
+ activateonbreak=1
+ showconsole=0
+ externalconsole=0
+ [breakpoints]
+ on=0
+ path=0
+ line=0
+ ignore=0
+ condition=0
+ panels=1
+  panel1
+ units=
+  (
+  modulefilenames=0
+  modulenames=0
+  moduleclassnames=0
+  a=0,4132,0,Units
+  )
+ files=
+  (
+  a=0,4132,0,Files
+  )
+ [layout]
+ windowlayout=313
+  [mainfo]
+  stackedunder=
+  x=4
+  y=24
+  cx=286
+  cy=74
+  wsize=0
+  active=1
+  visible=1
+  [mainfo.basedock]
+  splitdir=2
+  useroptions=5088
+  [mainfo.openfile]
+  filenames=0
+  filehistory=1
+   /C:/msegui/lib/common/dialogs/msethemesdialog.mfm
+  filefilterindex=1
+  filecolwidth=174
+  [actionsmo.watchesonact]
+  checked=1
+  [actionsmo.bluedotsonact]
+  checked=1
+  [sourcefo]
+  splitdir=0
+  useroptions=1051
+  parent=mainfo.panel1.container
+  visible=1
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=0
+  cx=313
+  cy=195
+  [debuggerfo]
+  splitdir=0
+  useroptions=1051
+  parent=mainfo.basedock
+  visible=1
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=0
+  cx=286
+  cy=40
+  [componentpalettefo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=objectinspectorfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=335
+  y=24
+  cx=440
+  cy=129
+  wsize=0
+  active=0
+  visible=1
+  [componentpalettefo.componentpages]
+  activetab=0
+  [messagefo]
+  splitdir=0
+  useroptions=3099
+  parent=mainfo.panel1.container
+  visible=0
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=0
+  y=115
+  cx=313
+  cy=80
+  [watchfo]
+  splitdir=0
+  useroptions=1563
+  stackedunder=disassfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=510
+  y=325
+  cx=310
+  cy=245
+  wsize=0
+  active=0
+  visible=0
+  [watchfo.grid]
+  width0=13
+  values1=0
+  width1=152
+  values2=0
+  [watchfo.watchon]
+  [watchfo.expression]
+  [watchfo.watcheson]
+  value=1
+  [objectinspectorfo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=formdesignerfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=670
+  y=179
+  cx=316
+  cy=484
+  wsize=0
+  active=0
+  visible=1
+  [objectinspectorfo.grid]
+  width0=109
+  width1=176
+  [breakpointsfo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=projecttreefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=107
+  y=404
+  cx=477
+  cy=128
+  wsize=0
+  active=0
+  visible=0
+  [breakpointsfo.bkptson]
+  value=1
+  [watchpointsfo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=stackfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=537
+  y=26
+  cx=483
+  cy=210
+  wsize=0
+  active=0
+  visible=0
+  [watchpointsfo.grid]
+  width0=16
+  values1=1
+   0
+  width1=33
+  values2=1
+   pinteger(0x126c6b4)^
+  width2=239
+  width4=34
+  values5=1
+   0
+  width5=38
+  values6=1
+   
+  width6=103
+  [stackfo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=cpufo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=407
+  y=349
+  cx=254
+  cy=180
+  wsize=0
+  active=0
+  visible=0
+  [projecttreefo]
+  splitdir=0
+  useroptions=27
+  stackedunder=findinfilefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=321
+  y=101
+  cx=698
+  cy=413
+  wsize=0
+  active=0
+  visible=0
+  [findinfilefo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=targetconsolefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=548
+  y=115
+  cx=369
+  cy=198
+  [cpufo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=threadsfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=192
+  y=451
+  cx=257
+  cy=188
+  wsize=0
+  active=0
+  visible=0
+  [disassfo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=breakpointsfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=162
+  y=502
+  cx=564
+  cy=210
+  wsize=0
+  active=0
+  visible=0
+  [threadsfo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=watchfo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=37
+  y=270
+  cx=349
+  cy=276
+  wsize=0
+  active=0
+  visible=0
+  [targetconsolefo]
+  splitdir=0
+  useroptions=1051
+  stackedunder=mainfo.panel1
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=116
+  y=297
+  cx=904
+  cy=347
+  wsize=0
+  active=0
+  visible=0
+  [mainfo.panel1]
+  splitdir=2
+  useroptions=2043
+  stackedunder=componentpalettefo
+  parent=
+  mdistate=0
+  nx=0
+  ny=0
+  ncx=0
+  ncy=0
+  x=157
+  y=493
+  cx=323
+  cy=195
+  wsize=0
+  active=0
+  visible=1
+ [edit]
+ hintwidth=0
+ hintheight=0
+ autoindent=1
+ blockindent=1
+ rightmarginon=1
+ rightmarginchars=80
+ tabstops=4
+ finddtext=
+ findhistory=0
+ findoptions=1
+ editpos=2
+  0,-1073741823
+  63,7
+ bookmarks0=0
+ bookmarks1=0
+ sourcefiles=2
+  /C:/fp/LAT8/themessample.pas
+  /C:/fp/LAT8/main.pas
+ relpaths=2
+  themessample.pas
+  main.pas
+ ismoduletexts=2
+  0
+  0
+ modules=1
+  /C:/fp/LAT8/main.mfm
+ visiblemodules=1
+  1
+ [sourcefo.tabwidget]
+ tabsize=134
+ firsttab=0
+ index=1
+ [components]
+ [selecteditpage]
+ colwidth=100
+ x=0
+ y=0
+ cx=0
+ cy=0
+ [progparams]
+ parameters=
+ progparamhistory=0
+ workingdirectory=
+ envvarons=0
+ envvarnames=0
+ envvarvalues=0
